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Preface 



With the roots of the BASIC language now firmly established 
throughout the world, it is necessary to make its many dialects 
understandable so programs can be transported between different 
computers. After you've found just the program you've been 
looking for, you know how frustrating it is only to discover that it 
won't RUN on your computer. This HANDBOOK addresses that 
problem by discussing in detail every commonly used BASIC 
Statement, Function, Operator and Command. 

For the most part, BASIC words mean the same thing to every 
computer which recognizes them. If a computer does not possess 
the capabilities of a needed or specified word, there are often 
ways to accomplish the same function by using another word, or 
combination of words. 

That's where The HANDBOOK comes in. It helps you get the 
most from your computer, be it a "bottom-of~the-line" micro, or 
an oversized monster. 



Have fun computing! 



Dr. David A. Lien 
San Diego - 1978 
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Introduction 



While preparing this Handbook, a number of assumptions and ground rules 
were established. Without them, the job would never have been completed 
and no one would benefit from the accumulation of information. Those 
assumptions and ground rules are listed here so you might better understand 
where the Handbook is ' 'coming from". 

1 . Users of the language are exceedingly frustrated by not being able to 
take a BASIC program from another computer or a magazine article and 
make it work on their computer. Top priority will be given to that 
information which will help users solve this "incompatability" problem. 

2. There is a large central core of BASIC words which are shared by all 
manufacturers. A thorough treatment of that core is more important 
than extended discourse on lesser used and obscure special-purpose 
BASIC words. 

3. To the extent that time and space allow, lesser used BASIC words will 
be covered, but like the expanding universe theory, BASIC keeps 
expanding. We can only chase it — but never catch it all. 

4. BASIC is used on all sizes of computers, Micros, Minis and Maxis. Size is 
unimportant, since some smaller computers have vastly superior BASIC 
capabilities. Emphasis shall therefore be on the language, not the size 

of machine. 

5. The Handbook will be an Encyclopedic type reference work — not a 
dictionary or a textbook. It will be a precise and definitive reference 
which can accompany a good BASIC text, but not try to replace it. 

6. To make the Handbook easy to use, it will be divided into logical 
sections, and a uniform method of dealing with each BASIC word will 
be followed. 

7. It's not as important to identify whose version of BASIC does what, as 
it is to make a given program run on a given computer, if at all possible. 
Tying specific capabilities to specific manufacturers will therefore be 
given low priority. 

8. Large computers typically use compilers; small ones typically use 
interpreters. Since it makes little difference to the language itself, we will 
use the words interpreter and compiler interchangeably . 



9. Each BASIC word will be treated clearly and concisely. To avoid wasting 
trees for excess paper, duplication will be minimized by referring the 
reader to other related words. 

10. The Handbook is important enough to users that they will readily (and 
hopefully, gently) point out errors, omissions and variations which might 
not be covered in this edition. We can pick up those changes and 
additions in future editions. 

1 1 . There is very little uniformity in control of peripheral devices, such as 
disks, tapes and printers. The words that are required and used extend 

far beyond the original scope of Dartmouth BASIC. To attempt to include 
them at this point would be premature. 

12. The Handbook is not a substitute for the manufacturer's manual which 
accompanies each computer. It is a supplement. 



Some Thoughts about the BASIC Language 

A computer is just a box of switches, not very different from the on/off 
switches which control household light bulbs. Each of the thousands of 
switches is either ON or OFF at a given time. By making up a "code" 
whereby the on/off status of each switch means something, an extensive 
(but not very complicated) system of holding and processing information 
can be created. 

Unfortunately, computers can only hold, process and communicate 
information in the form of "switches" being either ON or OFF. To most of 
us that's like a tough foreign language. That "computer language" is now 
taught in many schools and colleges. 

For most of us mere mortals, however (or those of us in a hurry), it is much 
more efficient to hire an interpreter to translate back and forth between this 
strange ON/OFF computer language and English. That way, we can talk 
directly to the interpreter, let the interpreter talk to the computer, let the 
computer talk back to the interpreter, and then the interpreter talks back 
to us. This might seem tedious and inefficient, but modern computer 
interpreters work so fast they are effectively "invisible" between us and the 
computer (and nothing is lost in translation but a few millionths of a second). 

We say the computer "talks" in machine language. We talk in English. Our 
interpreter isn't content to just do its job and not fuss about it, it wants to 
be called a language too. (These days, everybody's got to have a fancy title 
that no one can really pin down!) The most common interpreter language is 
named BASIC. BASIC stands for Beginners All-purpose Symbolic 
Instruction Code. Our interpreter's language is BASIC, and we hide it right 
inside the computer. Pretty sly - using part of the computer to act as its 
own interpreter. 

Early computers were almost entirely preoccupied with interpreting, when 
forced to communicate in the English language, (leaving little capability for 
doing anything useful). Changes in technology have brought prices down to 
where even today's "small" computers are large enough to easily do the 
interpreting, with room and power to spare for real computing. 

Development of the BASIC language at Dartmouth College in 1963 by 
Professors Kemeny and Kurtz was an important breakthrough, making it 
possible for us ordinary folks to use computers. That was why it was 
developed, and because it's so easy to learn and use, it is the most popular 
computer language. 



There are a number of other computer "languages" which act as interpreters, 
but most are so complicated that you have to learn them like a foreign 
language. Even so, they are still much simpler than machine language. 

The BASIC language is incredibly simple compared to the entire English 
language. Its vocabulary is very limited, several hundred words at most, 
compared to hundreds of thousands of English words. Unlike English, it has 
to be used with great precision — no sloppiness is allowed. The computer 
is just a dumb box of parts that does as it's told, but hasn't the good sense to 
come in out of the rain. 

BASIC was once looked down on by elitists as a simple-minded computer 
language of the unwashed masses, and, tho phenomenally powerful, not 
worthy of respectability. (So was the Volkswagen.) More computers now 
speak BASIC than any other computer language. Because of BASIC'S 
simplicity, computer programming (and thereby control) has escaped the 
grasp of just a select few. 

Because we have to "speak" BASIC clearly and concisely to the Computer, 
there are a few simple ground rules we must know. They include; 

1 . Each message we send to the computer must be typed on one line, 
and that line must have a number. For Example: 

10 PRINT "HELLO THERE DUMB COMPUTER!" 

The computer reads our message from the smallest line number to 
the largest, acting on each one as it goes. 

2. Letters of the alphabet are used just as in regular mathematical 
equations. If more than the 26 letters are needed, each letter can be 
followed by a single number (e.g. B7), making available 260 
additional "variables." In some versions, 2 or more letters can be 
combined to give a variable a name (e.g. "UP" or "ANGLE" or 
"IRVING", etc.). 

3. The computer responds to specific commands like RUN, STOP, 
LIST, etc., after we type those simple English words. 



4. A computer "program" is a whole set of messages in the form of a 
LISTing of numbered lines, 

5. The standard rules of mathematics generally apply to solving 
equations. The standard symbols also apply, with the exception of 
multiplication, where * is used instead of "x". Trigonometry, 
Matrices and Arrays, and other advanced operations can be 
performed with relative ease. 

If these and other simple rules were universally true, there would be no need 
for The BASIC Handbook, However, as computers developed in laboratories 
around the world, over a hundred variations or "dialects" of BASIC also 
developed. 

These dialects have much in common, but there are enough differences that 
non-trivial programs written for one computer will seldom run on another 
without modification. 

The efforts of the ANSI (American National Standards Institute) and NBS 
(National Bureau of Standards) towards standardization of at least a 
common language core will probably be the major factor in some day 
having a Standard BASIC. Failing that, the immutable laws of the free 
market will determine which version of BASIC survive. 



Caution: 



When you come across "standard" English words or abbreviations in 
computer programs, don't automatically assume they are BASIC 
words (the program might be in another computer language). A word 
to the wise . . . 

BASIC not only changes from manufacturer to manufacturer, it 
changes from a given manufacturer with time. Features are added, 
changed and dropped, often without notice. That's why two 
apparently identical computers may not always work exactly the 

same. 



How To Use This Handbook 



The information about each BASIC word is broken into a number of parts. Study this example 
carefully to better understand what to expect from your Handbook. 

(T) The WORD itself: It is a word found in a BASIC program, or used to control one. Words 
which are used for overall system monitor purposes, editor languages, and other computer 
languages are not part of The BASIC Handbook. 

® ANSI Standard notation: If the word "ANSI" appears here, it means that the word is part 
of the proposed National Bureau of Standards American National Standards Institute minimum 
BASIC vocabulary. Although adoption was not official as of press time, any changes in the 
proposed Standard are expected to be minor. 

(3) Word Category: BASIC words are divided into 4 categories: 

Commands: which tell the computer to do something with a program, like RUN, LIST, etc. 
Some computers allow commands to be imbedded in a program, thus also serve as a Statement. 
Statements: words which actually appear within a program, and comprise the detailed 
instructions on which the computer makes its decisions and performs its duties. Example: 

PRINT A ( B,C 

Functions: words which call forth pre-programmed machine-level "micro-programs". They 
perform relatively complicated "functions" such as finding a trigonometric value, a square 
root, etc., serving as part of a larger statement. Examples: 

LET X = TAN(Y) PRINT LOG(A) 

Operators: non-word characters which perform in special comparative or modifying capacities. 
Examples: comma, colon, equal sign, etc. 

In The BASIC Handbook, Commands, Statements and Functions appear in alphabetical order. 
Operators, not lending themselves to alphabetizing, appear in a separate section at the back. 
® Introductory and Descriptive remarks about the WORD, telling what it is and what it 
does. May include special notes relating to brands of computers which predominantly or 
exclusively use the word. 

(5) TEST PROGRAM: Allows user to enter a brief program into a computer to see if its 
interpreter or compiler recognizes the word and makes use of it. 

® SAMPLE RUN: Shows how the computer might be expected to respond to the TEST 
PROGRAM. Results will vary slightly from machine to machine, but the general pattern 
should not vary widely from the sample run, 

(7) HELPFUL HINTS: Sometimes there are programming techniques which greatly simplify 
achieving a high level of simplicity and/or reliability. They are noted here, 

(D IF YOUR COMPUTER DOESNT HAVE IT: Gives alternate ways to accomplish the same 
objective using other BASIC words, when possible . . . and it isn't always possible. In the case 
of functions, a sub-routine is usually included which is able to circumvent the absent intrinsic 
function. In the case of statements (especially PRINT), a simple re-writing of part of a program 
using other words and techniques allow program execution with the same or somewhat 

V4..L11 tAJ.1 AOIJIV^VJ. IVJUUiLt), 

(9) VARIATIONS: Variations in usage of the WORD; that is, how the WORD itself might be 
used differently by different computers. (Not variations in how the desired results might be 
achieved with other words.) 

® ALSO SEE: Rather than spend an inordinate amount of space duplicating information, 
words are sometimes "clustered" around a central word, and that central word is discussed in 
great detail. Related words then treat their specific purpose only, referring to other words for 
more detail as desired. 
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The FIX function is used to remove all numbers to the 
^^^ right of the decimal point Its operation is similar to the 
(4) INT function except FIX does not round negative 

numbers down. 

Example; i print fix(3.6) 

20 PRINT FlX(-3.6) 

prints the numbers 3 and -3. While 

10 PRINT INT(3.6) 
20 PRINT INT(-3„6) 

prints the numbers 3 and -4. 




Function (3 



FIX is capable of handling any number, large or small, within the limitations of the com- 
puter's interpreter. 

TEST PROGRAM 

10 REM 'FIX' TEST PROGRAM 

20 N=-1 2.3456 

30 A=FIX(N) 

4 PRINT "FIX PASSED THE TEST IF ";N;"IS CHANGED TO ";A 

99 END 



©SAMPLE RUN 



® 



FIX PASSED THE TEST IF -1 2.3456 IS CHANGED TO -12 

(§) IF YOUR COMPUTER DOESN'T II A VE IT 

If your interpreter does not have the FIX function capability, but has the ABS, INT and 
SGN functions, then line 30 in the TEST PROGRAM can be replaced with: 

30 A-SGN|N)*INT|ABS(N)) 

(D VARIATIONS IN USAGE 

None known. 



ALSO SEE 

INT, ABS, SGN 
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A. is used in the TRS-80 Level I and other variations of 
Palo Alto Tiny BASIC as an abbreviation for the ABS 
(absolute) function. 

For more information see ABS. 



TEST PROGRAM 

10 REM 'A. (ABS)' TEST PROGRAM 

20 Xs=A.{-100) 

30 PRINT "'A,' PASSED THE TEST IF";X; 

40 PRINT "IS PRINTED AS A POSITIVE VALUE, 1 

99 END 




Function 



SAMPLE RUN 



■A,' PASSED THE TEST IF 100 IS PRINTED AS A POSITIVE VALUE. 



VARIATIONS IN USAGE 

A. is also used in the Level I Basic as an abbreviation for the function AT, when used in 
PRINT statements. 

For more information see AT. 



TEST PROGRAM 

10 REM "A. (AT)" TEST PROGRAM 

20 V=A.("20) 

30 PRINT A.V;"A. PASSED THE 'AT' TEST.' 

99 END 



SAMPLE RUN 



A. PASSED THE AT' TEST. 



The function ABS must be used instead of A, to print absolute values. A. used after 
PRINT is always executed as the function AT. 

ALSO SEE 
ABS, AT, @ 
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The ABS function gives the absolute value of a number or 
numeric variable. A number's absolute value is its value 
without a + or — sign. 

Example: print abs(-i0) prints 10. 

ABS is capable of handling any number, large or small, 
within the limitations of the computer's interpreter. 



TEST PROGRAM 

10 REM 'ABS' TEST PROGRAM 

20 X=35 

30 PRINT "ABS PASSED THE TEST IF"; 

40 PRINT ABS(-435.28); 

50 PRINT ABS (-.03245); 

60 PRINT ABS (-X) 

70 PRINT "ARE ALL PRINTED AS POSITIVE VALUES.' 

99 END 




Function 



SAMPLE RUN 



ABS PASSED THE TEST IF 435.28 .03245 35 
ARE ALL PRINTED AS POSITIVE VALUES. 



Some interpreters also allow the ABS function within arithmetic operations. This feature 
can be used in programs which require a positive value from math operations that would 
otherwise produce a negative value. 

The entire math operation following ABS must be enclosed in parentheses. 



TEST PROGRAM 

10 REM 'ABS' MATH OPERATION TEST PROGRAM 

20 A=l 8 

30 B = 58 

40 PRINT "THE ABSOLUTE VALUE OF";(A~B}/2;"IS ,, ;ABS((A-B)/2) 

99 END 



SAMPLE RUN 



THE ABSOLUTE VALUE OF -20 IS 20 
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— ABS ====^^ 

IF YOUR COMPUTER DOESN'T HA VE IT 



If ABS is not intrinsic to the computer, it can easily be simulated by the following sub- 
routine: 

TEST PROGRAM 

10 REM 'ABS 1 SUBROUTINE TEST PROGRAM 

20 PRINT "ENTER A NEGATIVE NUMBER"; 

30 INPUT X 

40 GOSUB 30000 

50 PRINT "THE ABSOLUTE VALUE OF " ;X ^IS" jY 

60 GOTO 20 

30000 REM * ABS(X) SUBROUTINE * INPUT X, OUTPUT Y 

30010 IF X>=0 THEN 30040 

30020 Y»X*-1 

30030 RETURN 

30040 Y=X 

30050 RETURN 

30999 END 



SAMPLE RUN (using -35.5) 



ENTER A NEGATIVE NUMBER? —35.5 
THE ABSOLUTE VALUE OF -35.5 IS 35„5 
ENTER A NEGATIVE NUMBER? 



VARIATIONS IN USAGE 

None known. 
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AND is used in FOR-NEXT statements as a "logical 
math" operator. 

For example, if a=8 and b=6 then 80 reads; if the 
value of variable A equals 8 AND the value of variable B 
equals 6, the IF-THEN condition is met and execution 
continues at line 80, 

TEST PROGRAM #1 
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^^ 


1 




"'''''■' '^•fTTrTY' • l ' 
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Operator 



10 REM LOGICAL 'AND' TEST PROGRAM 

20 A = 8 

30 B=6 

40 IF A = 8 AND B = 6 THEN 70 

50 PRINT "AND FAILED THE TEST AS A LOGICAL OPERATOR' 

60 GOTO 99 

70 PRINT "AND PASSED THE LOGICAL OPERATOR TEST" 

99 END 



SAMPLE RUN 



AND PASSED THE LOGICAL OPERATOR TEST 



A few computers use the AND operator to "logically" compare strings. 

For example, if a$="a"and b$="B" then 80 reads, if the string variable AS is equal 
to (or "the same as") the letter A AND the string variable B$ is equal to the letter B, the 
IF-THEN condition is met and execution continues at line 80. For more information see 
the operators + and *. 



[EST PROGRAM #2 

10 REM 'STRING LOGICAL 'AND' TEST PROGRAM 

20 AS="A" 

30 B$^"F" 

40 IF A$~"A"AND B$ >"B"THEN70 

50 PRINT "'AND' FAILED THE TEST AS A LOGICAL OPERATOR" 

60 GOTO 99 

70 PRINT "'AND' PASSED THE STRING LOGICAL OPERATOR TEST" 

99 END 
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AND = 

SAMPLE RUN 



'AND' PASSED THE STRING LOGICAL OPERATOR TEST 

Some computers use the logical operator AND to determine if the conditions are met in 
two relational operators. When the condition of both operators is met, AND returns the 
number -1 . When the condition of the AND operator is not met, AND returns a 0. 

For example, print a=4 and b=8 if A equals 4 AND B equals 8 the computer will 
print the number -1. If either condition is not met, the computer prints a 0. 

TEST PROGRAM #3 

10 REM 'AND* LOGICAL TEST PROGRAM 

20 PRINT "ENTER A NUMBER FROM t TO 10"; 

30 INPUT A 

40 B=A > 4 AND A < 1 1 

50 IF B^-t THEN 80 

60 PRINT A;"IS NOT GREATER THAN 4 AND LESS THAN 1 1" 

70 GOTO 20 

8 PRINT A;"IS GREATER THAN 4 AND LESS THAN 1 1 ■■ 

99 END 



SAMPLE RUN (typical) 

ENTER A NUMBER FROM 1 TO 10? 2 

2 iS NOT GREATER THAN 4 AND LESS THAN t 1 
ENTER A NUMBER FROM 1 TO 10? 8 

8 IS GREATER THAN 4 AND LESS THAN 1 1 

The AND operator is used by a few computers to compute the binary logical AND of two 
numbers using Boolean algebra. 

Without presenting a complete course in Boolean algebra, ... it compares two binary 
bits to determine whether both are a binary "one". When both ANDed bits are a 
binary one, the computer answers with a 0. 

For example; 

1 AND = 

AND 1 = 

1 AND 1 - 1 
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mn 

Therefore, when the computer ANDs one number with another, each number's bit value 
is logically ANDed with the other number's bit value, producing a third number. 

For example 

DECIMAL BINARY 

3 0011 

(logical) AND 

5 0101 

= 1 0001 

In this example only the first (right hand) bit in each number is a binary one, so the 
resultant number is a decimal 1 (binary 0001). 

TEST PROGRAM #4 

10 REM 'AND' BINARY LOGIC TEST PROGRAM 

20 PRINT "ENTER A VALUE FOR X"; 

30 INPUT X 

40 PRINT "ENTER A VALUE FOR Y"; 

50 INPUT Y 

60 A=X AND Y 

70 PRINT "THE LOGICAL 'AND' VALUE OF";X;"AND";Y;"IS";A 

80 GOTO 20 

99 END 

SAMPLE RUN (using 6 and 10) 

ENTER A VALUE FOR X? 6 

ENTER A VALUE FOR Y7 t0 

THE LOGICAL 'AND* VALUE OF 6 AND 10 IS 2 

ENTER A VALUE FOR X? 

VARIATIONS IN USAGE 
None known. 

ALSO SEE 
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The ASC function converts a character or string variable 
to ASCII integer code. 

For example, print asc("A") prints 65, the ASCII code 
for the letter A. print asc{a$) prints the ASCII code 
of the first character in string variable A$„ 

TEST PROGRAM 

10 REM 'ASC(CHARACTER)' TEST PROGRAM 

20 PRINT "THE ASCII CODE FOR LETTER A IS"; 

30 PRINT ASC {"A") 

40 IF ASC{"A'*) = 65 THEN 70 

50 PRINT "ASC FAILED THE TEST" 

60 GOTO 99 

70 PRINT "ASC PASSED THE TEST" 

99 END 

SAMPLE RUN 

THE ASCII CODE FOR LETTER A IS 65 
ASC PASSED THE TEST 

The next program tests the ASC function with a variable. 
TEST PROGRAM 

10 REM 'ASC(STRING VARIABLE}' TEST PROGRAM 

20 PRINT "TYPE ANY LETTER, NUMBER, OR CHARACTER* 

30 INPUT AS 

40 PRINT "THE ASCII CODE FOR ";A$;" IS";ASC(A$) 

99 END 




Function 



SAMPLE RUN (using H) 

TYPE ANY LETTER, NUMBER, OR CHARACTER? H 
THE ASCII CODE FOR H IS 72 

Some computers which incorporate the ASC function can accept character strings longer 
than one character, but only the first character is evaluated and converted to ASCII 
code. To test for the ASC string limit, use the second Test Program and INPUT progres- 
sively longer strings until an error message appears. 

VARIATIONS IN USAGE 

Some interpreters (e.g. MAXBASIC) use the format ASC(A$,X) which prints the ASCII 
code of the first X characters contained in A$. 

ALSO SEE 

CHR$, Appendix A for the ASCII code. 
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The ASN(n) function is used by the TEKTRONIX 4051 
BASIC to compute the ARCSIN in Radians (not in 
degrees!) of the ratio n. A radian is approximately 57 
degrees. 





Function 

Arcsin (ASN) is defined as the angle (A) created for a certain ratio of the length of the 
side opposite it (Y) to the length of the hypotenuse of the right triangle, 

A=ASN[Y/H) 

The opposite of ASN is SINE (SIN). The SINE of an angle is the ratio of the length of the 
side opposite the angle to the length of the hypotenuse of the right triangle. 

S1N(A) = Y/H 



TEST PROGRAM 

10 REM 'ASN' TEST PROGRAM 

20 PRINT "ENTER A RATIO OR SINE VALUE"; 

30 INPUT N 

40 W=ASN(N) 

50 PRINT "THE ANGLE WITH THE Y/H RATIO O F" ;N ;" IS" ;W ;"R AD I ANS" 

30999 END 

SAMPLE RUN (using J) 

ENTER A RATIO OR SINE VALUE? .5 

THE ANGLE WITH THE Y/H RATIO OF .5 IS ,52359 RADIANS 

To convert values from radians to degrees, multiply the angle (in radians) times 57.29578, 

Example, d=asn(a)*57. 29578 To convert values from degrees to radians, multiply the 
angle (in degrees) times .0174533, 

Example, r=a( angle expressed in degrees) *.0i 74533, 

If your interpreter has the ATN (ARCTANGENT) and SQR (SQUARE ROOT) 
capability, but does not have ASN, substitute ATN(X/SQR(-X*X+1) for ASN. 
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ASN 

If your interpreter does not have ASN or ATN and SQR capability, the following sub- 
routine can be substituted: 

30000 GOTO 30999 

30530 REM * ARCSiN SUBROUTINE * INPUT S, OUTPUT W 

30535 REM ALSO USES VARIABLES X AND Z INTERNALLY 

30540 X^S 

30545 IF A8S(S) < =.707107 THEN 30600 

30550 X=1-S*S 

30555 IF X < THEN 30558 

30557 GOTO 30560 

30558 PRINT S;"IS OUT OF RANGE" 

30559 STOP 

30560 W = X/2 
30565 Z=0 

30570 Y = (X/W-W)/2 

30575 IF Y = THEN 30597 

30580 IF Y = Z THEN 30597 

30585 W=W+Y 

30590 Z^Y 

30595 GOTO 30570 

30597 X-W 

30600 Y = X+X*X*X/6 + X*X*X*X*X* .0754- X*X*X*X*X*X*X*4 4 464286E-2 

3 06 05 W-Y-hX*X*X*X*X*X*X*X*X*3„038194E-2 

30610 IF ABS(S) > .707107 THEN 30620 

30615 GOTO 30625 

30620 W==L570796-W 

30630 RETURN 



To use this subroutine with the TEST PROGRAM for finding the ARCSIN (in 
RADIANS) of a ratio (SINE), make the following TEST PROGRAM changes: 

35 S=N 

40 GOSUB 30540 

To make the ARCSIN subroutine express the angle in DEGREES, add the following line 
to it: 

30625 W=W*57. 29578 



VARIATIONS IN USAGE 

None known. 

ALSO SEE 

SIN, ATN, SQR, COS, TAN 
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The AT function is used with PRINT statements (TRS-80 
Level I BASIC) to indicate the PRINT statement's starting 
location. The AT function value may be a number, 
numeric variable, or mathematical operation. A comma or 
semi-colon must be inserted between the AT value and the 
string. 

For example: 

10 PRINT AT 420, "HEUUO" 
20 PRINT AT (420); "HELLO" 

Both lines print the word "HELLO' 1 AT location 420. The parentheses are optional. 




Function 



TEST PROGRAM 

10 REM 'AT' TEST PROGRAM 

20 PRINT AT \ 28, "2, IF THIS LINE IS PRINTED AFTER LINE 1 ." 

30 PRINT AT 0-"1 . THE 'AT' FUNCTION PASSED THE TEST" 

40 GOTO 40 

99 END 

SAMPLE RUN 

1, THE 'AT' FUNCTION PASSED THE TEST 

2. IF THIS LINE IS PRINTED AFTER LINE 1 . 

The TRS-80 has 1024 PRINT AT locations (0 to 1023). If an AT value smaller than zero 
or larger than 1023 is used, the computer automatically calculates the difference between 
the out-of-range number and 1023 for the AT value. 

For example, print at 1034 -heluo" prints the word HELLO at location 10 (don't 
forget to count zero as one location). 

TEST PROGRAM 

1 REM 'AT OVERFLOW TEST PROGRAM 

20 PRINT AT 192, "'AT' (OVERFLOW) PASSED THE TEST" 
30 PRINT AT 1 248, "IF ONLY ONE LINE IS PRINTED." 
99 END 



SAMPLE RUN 

'AT' (OVERFLOW) PASSED THE TEST IF ONLY ONE LINE IS PRINTED. 
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AT ========^ 

The following program tests the interpreter's ability to use numbers, numeric variables, 
or mathematic operations in the AT function. 

TEST PROGRAM 

10 REM 'AT VALUE' TEST PROGRAM 

20 FOR X=l TO 15 

30 PRINT X 

40 NEXT X 

50 PRINT ATX*28*4," , AT' PASSED THE TEST IF THIS IS LINE #8."; 

60 GOTO 60 

99 END 



SAMPLE RUN 

t 

2 

3 

4 

5 

6 

7 

8 'AT' PASSED THE TEST IF THIS IS LINE #8. 

9 

10 

1 1 

12 

13 

14 

15 

DIFFERENT WORD FOR A T 

The @ operator is used by some computers (e.g. the TRS-80 Level II BASIC) for the AT 
function. See @ for specific constraints. 

ALSO SEE 

@, PRINT, TAB 
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ATAN(n) is used in the Motorola BASIC to compute the 
ARCTANGENT in Radians (not in degrees) of the ratio n. 
A radian is approximately 57 degrees. 

For more information see ATN. 



TEST PROGRAM 



10 REM 'AT AN* TEST PROGRAM 

20 A=ATN(2) 

30 PRINT "THE ANGLE WITH THE Y/X RATIO OF 2 IS" ;A ;"R ADI ANS* 

99 END 



m 




^% 






i i 

■ ' -V~ 


%-« 


-v,^._.J| 


sE9 




Function 





SAMPLE RUN 

THE ANGLE WITH THE Y/X RATIO OF* 2 IS 1.10715 RADIANS 

To convert values from radians to degrees, multiply the angle (in radians) times 57.29578. 
Example, d=atan(a)*57. 29578. To convert values from degrees to radians, multiply the 
angle (in degrees) times ,0174533. Example, R=A(angle expressed in degrees)*. 0i 74533. 

IF YOUR COMPUTER DOESN'T HA VE IT 

See the special subroutine in ATN. 

VARIATIONS IN USAGE 
None known; 

ALSO SEE 
ATN, TAN 
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The ATN(n) function computes the ARCTANGENT in 
Radians (not in degrees!) of the ratio n. A radian is 
approximately 57 degrees. 




Y 




Function 



ARCTANGENT (ATN) is defined as the angle (A) required for a certain ratio of the 
length of the side opposite it (Y) to the length of the side adjacent to it (X). ATN means 
literally "The Arc (angle) of the Tangent (ratio)/' 

A = ATN(Y/X) 

The opposite of ATN is Tangent (TAN). The Tangent of an angle is the ratio of the length 
of the side opposite it to the length of the side adjacent to it, 

TAN(A} = Y/X 

TEST PROGRAM 

!0 REM 'ATN' TEST PROGRAM 

20 PRINT "ENTER A RATIO OR TANGENT VALUE"; 
30 INPUT N 
40 A=ATN(N) 

50 PRINT "THE ANGLE WITH THE X/Y RATIO OF";N;"IS";Ai"RADIANS" 
30999 END 

SAMPLE RUN (for input of 2) 

ENTER A RATIO OR TANGENT VALUE? Z 

THE ANGLE WITH THE X/Y RATIO OF Z IS 110715 RADIANS 

To convert values from radians to degrees, multiply the angle (in radians) times 57.29578. 
Example: d=atn(a)*57. 29578 

To convert values from degrees to radians, multiply the angle (in degrees) times .0174533. 
Example: R=A(angle expressed in degrees)*. 0i 74533 
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ATM 



IF YOUR COMPUTER DOESN'T HA VE IT 

If your interpreter does not have the capability of finding the ATN (Arctangent), the 
following subroutine can be substituted. 

The subroutine program you'll find under SGN must be added to this one to make it 
work (saves space not to duplicate it here). 

30000 GOTO 30999 

30660 REM * ARCTANGENT SUBROUTINE * INPUT X, OUTPUT A (RADIANS) 

30670 REM ALSO USES B AND T INTERNALLY 

30680 GOSUB 30805 

30690 X^ABS(X) 

30695 C = 

30700 IF X >1 THEN 30710 

30705 GOTO 30720 

30710 C=I 

30715 X=l/X 

30720 A=X*X 

30725 B=((2.86623E-3*A-1.6 1657E~2)*A + 4.29096E-2)*A 

3 073 B = (U(B~7„528 9E-2)*A + .t 06563)*A-.1 42089)* A+. 1 9993 6) * A 

30735 A={(B-,333332)*A+1)*X 

30740 IF C=1 THEN 30750 

30745 GOTO 30755 

30750 A=1.570796-A 

30755 A=T*A 

30760 RETURN 

To use this subroutine with the TEST PROGRAM for finding the Arctangent (in Radians) 
of a ratio (Tangent), make the following TEST PROGRAM changes: 

35 X=N 

40 GOSUB 30680 

To make the Arctangent subroutine express the angle in Degrees, add the following line 
to it: 

30760 A=A*57. 29578 

VARIATIONS IN USAGE 

O f '\ :_-<■«— .,-.-r» + rt-n nrt«Trftr+ ntrnfir + liinrt + r\ Acxcttraav OiltAm of Jcoll'W 

ALSO SEE 

TAN, ATAN, ASN, SIN, COS 
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Ml 



A TRICK 



This is very important! Most computers only have an ATN as their "inverse trig func- 
tion". ARCCOS and ARCSIN are rarely found. This leaves ATN as the only "window" 
through which all angles can be calculated and returned to the "outside". 



Now obviously, if ATN is to be used, the TAN must be known, or able to be determined, 
and that may be easier said than done. The following formulas will enable you to convert 
any ratio to TAN, and from there to the angle itself, via ATN. 



TAN= 1/COT 



TAN = < 



1 - COS 2 



1 



\ COS2 



TAN; 



\J 



1 -SIN3 
SIN2 



TAN = 



\ 



L_ 

CSC2-1 



TAN 



^ 



SEC2-1 
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The AUTO command provides automatic insertion of 
program line numbers. The starting line number and the 
incremental value between lines can be specified in the 
AUTO command. For example, auto i 00,5 sets the first 
line number at 100 and increments each successive line 
number by 5. 

If the starting line number and increment value are not 
specified in the AUTO command, the computer auto- 
matically sets the first line number at 10 and increments Command 
the line numbers by 10. 

If the AUTO command generates a line number that is already in use, an asterisk may 
appear following the number. This cautions the programmer that information typed into 
the computer at that line number will erase existing statements. The AUTO feature may 
be turned off to prevent this from happening. To turn off the AUTO feature, some 
computers require pressing the BREAK key, while others require typing a control C. 

TEST PROCEDURE 

To test the computer's AUTO feature, type the AUTO command and press the ENTER 
key (RETURN on some keyboards). If the line number 10 is printed followed by a 
prompt, then the computer successfully passed the AUTO command test. 

Press the ENTER key again. The computer should print another line number increased in 
value by 10, 

Type the command auto i 0,5 and enter this program. 

10 REM 'AUTO' TEST PROGRAM 

15 PRINT "THE NEXT LINE NUMBER SHOULD INCREASED BY 5" 
20 PRINT "PRESS THE BREAK KEY TO STOP THE AUTO FEATURE" 
99 END 

After the AUTO feature is stopped with the BREAK key, line numbers out of sequence 
can be entered (e.g. line 99). 

Again enter auto i 0,5 and line 10 should be printed, followed by an asterisk, indicating 
information is presently stored at line 10. New information can be typed in at this point 
or the original information can be saved by pressing the BREAK key. 

List the program to check the contents of each line. 

VARIATIONS IN USAGE 
None known. 

ALSO SEE 
BREAK, LIST 
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The BASE statement is used in some computers (e.g. 
those with Control Data BASIC Version 3) to define the 
BASE (lowest) variable array element value as or 1 , 
For example: 



10 BASE 
20 DIM A{5) 



The BASE statement defines this array as a six element 
array [A(0) to A(5)] . 




Statement 



Many computers automatically allow array elements 1 to 10 (10 elements) without prior 
DIMensioning. The BASE statement allows this range to be changed from the normal 10 
elements (1 to 10) to 1 1 elements (0 to 10), and back again. 

Only one BASE statement may be used in a program and it must be executed before DIM 
statements and before array variables are manipulated. 

TEST PROGRAM 

10 REM 'BASE' TEST PROGRAM 

20 BASE 

30 DIM A{5) 

40 FOR X=0 TO 5 

50 A(X}=X 

60 NEXT X 

70 FOR X=0 TO 5 

80 PRINT A{X); 

90 NEXT X 

100 PRINT "THE BASE STATEMENT PASSED THE TEST" 

999 END 

SAMPLE RUN 

1 2 3 4 5 THE BASE STATEMENT PASSED THE TEST 

A few computers (e.g. those using MAXBASIC) allow more than one BASE statement in 
a program and allow the BASE value to be defined at any integer value. 

For example: 

1 BASE 5 
20 DIM A{! 0) 

The BASE 5 statement defines this array as a six element array [A(5) to A(10)] . 
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BASE = 

TEST PROGRAM 



10 REM 'BASE' TEST PROGRAM 

20 BASE (3) 

30 DIM A{5) 

40 FOR X=3 TO 5 

50 A{X)=X 

60 NEXT X 

70 BASE (0) 

80 FOR X = TO 2 

90 A(X) = X 

100 NEXT X 

1 10 FOR X=0 TO 5 

120 PRINT A(X); 

130 NEXT X 

140 PRINT "THE BASE STATEMENT PASSED THE TEST' 

999 END 

SAMPLE RUN 

1 2 3 4 S THE BASE STATEMENT PASSED THE TEST 

VARIATIONS IN USAGE 

ANSI BASIC includes the OPTION statement. 

ALSO SEE 

DIM, OPTION 
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BREAK is used in a few computers (e.g. the Harris 
BASIC-V) to direct one or more program lines to stop 
execution and place the computer in the monitor or 
immediate mode, similar to a STOP statement. 

The BREAK statement can be used to cause any line 
number (or line numbers) to stop program execution by 
placing each line number (separated by a comma) after 
the BREAK statement. 




Statement 



For example, 10 break 50,70, i 00 stops the computer 

before executing lines 50, 70, and 100. Program execution is continued after each 

BREAK by typing COntinue. 

BREAK also accepts a range of line numbers by placing a dash between the first and last 
line number in the range. 

For example, 10 break 50-100 stops program execution at the end of each line from 
50 to 100. 

Execution can be stopped before each program line by using the BREAK ALL statement. 
This allows the user to "step through" the program one line at a time, typing the CO 
command after each break. 

Unlike the END statement which (in most computers} causes all variables to be reset to 
zero, values stored in variables are retained when the BREAK statement is executed. 

TEST PROGRAM 

10 REM 'BREAK 1 TEST PROGRAM 

20 BREAK 30,50,70-90 

30 PRINT "THE COMPUTER SHOULD STOP EXECUTION AT LINE 30" 

40 REM TYPE THE COMMAND 'CO' TO CONTINUE 

50 PRINT "LINE 50" 

60 REM THIS LINE NOT INCLUDED IN THE BREAK STATEMENT 

70 PRINT "LINE 70" 

80 PRINT "LINE 80" 

90 PRINT "AND LINE 90" 

99 END 



SAMPLE RUN 

THE COMPUTER SHOULD STOP EXECUTION AT LINE 30 
LINE 50 
LINE 70 
LINE 80 
AND LINE 90 
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BREAK — _— ^^ 

VARIATIONS IN USAGE 

Some terminals have a BREAK key to allow keyboard interruption of the computer's 
operation. 

ALSO SEE 

STOP, CO, CON, CONT, END 
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C. is used in the TRS-80 Level I as an abbreviation for the 
CONT (continue) statement. 

For more information see CONT. 



TEST PROGRAM 

10 REM »C. (CONT)' TEST PROGRAM 

20 PRINT "ENTER THE 'C/ COMMAND" 

30 STOP 

40 PRINT "THE C. COMMAND PASSED THE TEST' 

99 END 




Command 



SAMPLE RUN 

ENTER THE 'C COMMAND 

BREAK AT 30 

C. 

THE C. COMMAND PASSED THE TEST 

VARIATIONS IN USAGE 

None known. 

ALSO SEE 

CONT, CON, STOP 
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CDBL is used to change numbers or numeric variables 
from regular "single precision" to "double precision". 
Variables used in the CDBL function return to their 
original single precision status if they are used again with- 
out the CDBL. 

Double precision variables are capable of storing numbers 
containing 17 digits (only 16 digits are printed). Single 
precision variables are accurate to 6 digits. 




Function 



TEST PROGRAM 

10 REM 'CDBL' TEST PROGRAM 

20 X-2 

30 Y^3 

40 PRINT "CDBL. CHANGES X/Y FROM";X/Y ;"TO";CDBL(X)/CDBL( Y) 

50 PRINT "AND BACK TO THE VALUE OF";X/Y;"WHEN REMOVED" 

99 END 



SAMPLE RUN 

CDBL CHANGES X/Y FROM .666667 TO ,6666666666666667 
AND BACK TO THE VALUE OF .666667 WHEN REMOVED 



VARIATIONS IN USAGE 
None known. 

ALSO SEE 

DEFDBL, PEFSNG, DEFINT, CSNG, #, !,% 
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CHAIN is used to load a new program into the computer's 
memory from an external device (such as tape or disc) 
and execute that program without additional RUN com- 
mands. Each program may also CHAIN to other programs, 
including back to the starting one. 

The main advantage of CHAINing is that it permits con- 
secutive execution of related programs without needing to 
keep more than one of them actually in the computer at a 
given time. This is especially useful where there is a com- Statement 

mon file of DATA stored externally which can be access- 
ed and manipulated by all the programs in the CHAIN. CHAIN finds its best application 
in systems large enough to have disc storage with reasonably fast access times. 

The new program's name must be included after the CHAIN statement (a few computers 
require quotes around the name). Some computers specify the new program's starting line 
number with a number following the program's name. If the starting line is omitted, the 
computer automatically starts at the new program's beginning. 

For example, 10 chain test, 30 tells the computer to erase the program presently in 
memory and load a program called "TEST" from an external device, then start execution 
at its line 30. The external storage device can be specified in some computers (e.g. the 
DEC 10 BASIC) by placing the device name after CHAIN, followed by a colon. 

For example, 10 chain ptr:test ( i0 This tells the computer to load a program named 
"TEST" from the Paper Tape Reader and start execution at its line 10. 

TEST PROGRAM 

Save this program on disc or tape under the name "TEST". 

10 REM * TEST * PROGRAM 

20 PRINT "THE 'TEST' PROGRAM IS NOW RUNNING" 

30 FOR X=1 TO 9 

40 PRINT X; 

50 NEXT X 

6 PRINT "THIS PROGRAM WIl-U NOW CHAIN BACK TO THE MAIN PROGRAM" 

70 CHAIN MAIN, 40 

99 END 
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CHAIN 

Now, enter the following program into the computer, and save it on disc or tape under 
the name ''MAIN". 

10 REM *MAIN * PROGRAM 

20 PRINT "THIS PROGRAM SHOULD LOAD AND RUN THE 'TEST' PROGRAM" 

30 CHAIN TEST 

40 PRINT "CHAIN PASSED THE TEST IF THE 'TEST* PROGRAM" 

50 PRINT "PRINTED A SERIES OF NUMBERS" 

99 END 

Prepare your disc or tape(s) to be read on command, then RUN. 
SAMPLE RUN 

THIS PROGRAM SHOULD LOAD AND RUN THE 'TEST' PROGRAM 
THE 'TEST PROGRAM IS NOW RUNNING 

1 23456789 
THIS PROGRAM SHOULD NOW CHAIN BACK TO THE MAIN PROGRAM 
CHAIN PASSED THE TEST IF THE 'TEST' PROGRAM 
PRINTED A SERIES OF NUMBERS 

VARIATIONS IN USAGE 

None other known. 

ALSO SEE 

CLOAD, CSAVE 



36 



CHAR(nl,n2) is used in some computers with MAX- 
BASIC to retrieve the character represented by the ASCII 
decimal code number (nl). The value (n2) specifies the 
number of characters (nl) to be included in the string. If 
the value (n2) is omitted, the computer automatically 
assumes its value to be 5. 

TEST PROGRAM 

10 REM 'CHAR' TEST PROGRAM 

20 PRINT "THE CHAR FUNCTION PASSED THE "; 

30 FOR X=1 TO 4 

40 READ A 

50 PRINT CHAR(A.I) 

60 NEXT X 

70 DATA 84,69,83,84 

99 END 




Function 



SAMPLE RUN 



THE CHAR FUNCTION PASSED THE TEST 



IF YOUR COMPUTER DOESN'T HA VE IT 



If your computer failed the TEST PROGRAM, try the TEST PROGRAMS in CHARS 
CHR$ and CHR„ 



VARIATIONS IN USAGE 

None known. 



ALSO SEE 

CHARS, CHR$, CHR, and the ASCII code appendix. 
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CHAR$(n) is used in some computers (e.g. those using 
COMPUMAX BASIC) to retrieve the single character 
represented by a decimal ASCII code (n). 

For example, print char$(75) prints the letter K. 

For more information see CHR$. 
TEST PROGRAM 

10 REM 'CHARS' TEST PROGRAM 

20 PRINT "THE CHARS FUNCTION PASSED THE •'; 

30 FOR X=l TO 4 

40 READ A 

50 PRINT CHARS(A); 

60 NEXT X 

70 DATA 84,69,83,84 

99 END 




Function 



SAMPLE RUN 

THE CHARS FUNCTION PASSED THE TEST" 

IF YOUR COMPUTER DOESN'T HA VE IT 

If your computer failed the TEST PROGRAM, try the TEST PROGRAMS in CHR$ and 
CHR 

VARIATIONS IN USAGE 

None known. 

ALSO SEE 

CHR$, CHR, and the ASCII code appendix. 
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The CHR function is used to retrieve the single character 
represented by the ASCII decimal code number enclosed 
in parenthesis. Its use (e.g. SWTP 4K) is rare compared to 
CHR$. 

For example, print chr(7s) prints the letter K. 

For more information see CHR$ ^__ 

Function 
TEST PROGRAM 

10 REM 'CHR* TEST PROGRAM 

20 PRINT "THE CHR FUNCTION PASSED THE "; 

30 FOR X=M TO 4 

40 READ A 

50 PRINT CHR(A); 

60 NEXT X 

70 DATA 84,69,83,84 

99 END 

SAMPLE RUN 

THE CHR FUNCTION PASSED THE TEST 

VARIATIONS IN USAGE 

None known. 

ALSO SEE 

CHR$, CHR, CHARS and the ASCII Appendix. 
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The CHR$ function is used to retrieve the single character 
represented by the decimal ASCII number code enclosed 
in parenthesis. For example: print chr$(7S) prints the 
letter K. 



The ASCII code can be represented by a number or 
variable within the ASCII code range (typically 0-127). 
Some computers have an extended ASCII code (up to 
255) which includes special capabilities and graphics 
characters. Many computers set aside certain ASCII num- 
bers for special "non-standard" purposes (typically, control a line printer, erase the 
screen, "put out the cat," etc.). 




Function 



This program lets you test any ASCII code number and examine the ASCII character 
created (or use for some other purpose). 



TEST PROGRAM 

10 REM 'CHRS' TEST PROGRAM 

20 PRINT "ENTER THE LOWEST ASCII CODE NUMBER"; 

30 INPUT L 

40 PRINT "ENTER THE HIGHEST ASCII CODE NUMBER* 

50 INPUT H 

60 FOR X=L, TO H 

70 PRINT "ASCII CODE";X;"= M t 

80 PRINT CHR$(X) 

90 FOR Y = 1 TO 150 

100 NEXT Y 

1 10 NEXT X 

999 END 

SAMPLE RUN (checking only 4 numbers) 

ENTER THE LOWEST ASCII CODE NUMBER? 65 
ENTER THE HIGHEST ASCII CODE NUMBER? 68 
ASCII CODE 65 - A 
ASCII CODE 66 - B 
ASCII CODE 67 - C 
ASCII CODE 68 - D 



Try this program using your computer's full range of ASCII codes. 

VARIATIONS IN USAGE 
None known. 

ALSO SEE 

CHR, ASC, Appendix 
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Function 



CINT is used to convert individual numbers or numeric 
variables to their integer value. Unlike the INT function, 
variables used in the CINT function return to their origi- 
nal precision if they are used again without the CINT 
function. 

Numbers are always rounded down — that is, the whole 
number remains the same regardless of the value of num- 
bers removed to the right of the decimal point. When a 
negative number is integered, the resultant number will be 
rounded off to the next smaller whole number. 

For example, print cint(-4. 65) will print the number -5. 

Most computers do not allow numbers assigned to the CINT function to be smaller than 
-32767 or larger than +32767„ 

TEST PROGRAM 

10 REM 'CINT' TEST PROGRAM 

20 DEFDBL X 

30 X=f 2345,6789 

40 PRINT "CINT CHANGES THE VALUE OF X FROM 1 ' ;X;"TO" ;C1NT(X} 

50 PRINT "AND BACK TO THE VALUE OF";X;"WHEN REMOVED" 

99 END 



SAMPLE RUN 



CINT CHANGES THE VALUE OF X FROM 12345.6789 TO 12345 
AND BACK TO THE VALUE OF 12345.6789 WHEN REMOVED 



VARIATIONS IN USAGE 

None known. 

ALSO SEE 

DEFINT, INT, DEFDBL, DEFSNG, CDBL, CSNG, !, #, % 
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CLEAR is used to set all numeric variables to zero and 
clear all data that may be held by string variables. 

CLEAR can be used as either a command or program 
statement. 

TEST PROGRAM 

10 REM 'CLEAR' TEST PROGRAM 

20 A=300 

30 AS^TEST STRING" 

40 PRINT "BEFORE THE 'CLEAR' COMMAND A==";A 

50 PRINT "AND STRING VARIABLE A$ = ";A$ 

60 CLEAR 

70 PRINT "AFTER THE 'CLEAR' COMMAND A = ";A 

80 PRINT "AND STRING VARIABLE AS~";A$ 

99 END 




Command 
Statement 



SAMPLE RUN 

BEFORE THE 'CLEAR* COMMAND A = 300 
AND STRING VARIABLE A$=TEST STRING 
AFTER THE 'CLEAR' COMMAND A=0 
AND STRING VARIABLE A$= 

CLEAR is used by some computers to specify the number of bytes to reserve in memory 
for strings. This feature lets the programmer conserve memory by specifying the actual 
amount of space needed for string storage. 

For example, clear i 00 sets 100 bytes of memory aside for string storage. 

It is common for interpreters with CLEAR capability to automatically reserve 50 bytes in 
memory for strings. Others reserve up to 200 bytes for this purpose. 

The amount of space remaining in memory for string storage can be checked by inter- 
preters with the FRE(A$) function when used in a PRINT statement. 

TEST PROGRAM 

10 REM 'CLEAR X' TEST PROGRAM 

20 CLEAR 5 

30 PRINT "ENTER PROM 1 TO 5 CHARACTERS"; 

40 INPUT AS 

50 PRINT "STRING "AS;" USED ALL BUT" ;FRE{ A$) ;"B YTES" 

60 PRINT "OP STRING SPACE." 

70 GOTO 20 

99 END 



42 



CLEAR ===^^ 

SAMPLE RUN (using T and TEST) 

ENTER FROM 1 TO 5 CHARACTERS? T 

STRING T USED ALL. BUT 4 BYTES 

OF STRING SPACE. 

ENTER FROM 1 TO 5 CHARACTERS? TEST 

STRING TEST USED ALL BUT 1 BYTES 

OF STRING SPACE. 

ENTER FROM 1 TO 5 CHARACTERS? 

Some computers with CLEAR capability allow the CLEAR value to be specified by a 
variable. To test this feature, make these changes to the second Test Program; 

20 A = 5 

25 CLEAR A 

If the interpreter accepted this program change, the sample run should not change. 



VARIATIONS IN USAGE 

Some computers use CLEAR as a special statement to clear terminal input or output 
buffers. 



ALSO SEE 
CLR, FRE(A$) 
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Function 



The CLG(n) function is used by the Honeywell Series 60 
BASIC to compute the value of the common (base 10) 
logarithm of any number (n) whose value is greater than 0. 

TEST PROGRAM 

10 REM 'CL.G* TEST PROGRAM 

20 PRINT "ENTER A POSITIVE NUMBER" 

30 INPUT N 

40 X=CLG(N) 

50 PRINT "THE COMMON LOG OF";N;"IS";X 

30999 END 

SAMPLE RUN (using 100) 

ENTER A POSITIVE NUMBER? 100 
THE COMMON LOG OF 100 iS 2 

IF YOUR COMPUTER DOESN'T HA VE IT 



If your computer failed the TEST PROGRAM, try the TEST PROGRAMS in LOG10, 
CLOG, LOG and LGT. If they also fail, substitute the subroutine found under LOG 
(saves space not to duplicate it here). To make it compute the common logarithm 
(instead of the natural logarithm), make the following subroutine changes: 

30170 REM * COMMON LOGARITHM SUBROUTINE * INPUT X, OUTPUT X 
30200 GOTO 30223 
30223 X=L*.4342945 

To use this subroutine in this TEST PROGRAM, make these TEST PROGRAM changes: 



40 GOSUB 30170 

CONVERSION FACTORS 

To convert a common log to a natural log, multiply the common log value times 2.3026. 

For example, x=clg(n)*2.3026 

To convert a natural log to a common log, multiply the natural log value times .434295. 

VARIATIONS IN USAGE 
None known. 

ALSO SEE 

LOG 10, CLOG, LGT, LOG, LOGE, LN 
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CLK(n) is used in the Sperry Univac System/9 BASIC to 
indicate the time of day in hours, minutes, and seconds 
(hhmmss). A number or numeric variable (enclosed in 
parenthesis) following CLK is required, although it has no 
effect on the TIM function. 



TEST PROGRAM 

10 REM CLK' TEST PROGRAM Function 

20 PRINT "THE CURRENT TIME IS ";CLK(N) 

30 PRINT "THE CLK FUNCTION PASSED THE TEST" 

40 PRINT "IF A SIX DIGIT NUMBER IS PRINTED" 

99 END 

SAMPLE RUN (using 082515) 

THE CURRENT TIME IS 082515 

THE CL.K FUNCTION PASSED THE TEST 

IF A SIX DIGIT NUMBER IS PRINTED 

VARIATIONS IN USAGE 

None known. 

ALSO SEE 

CLK$, TIME, TIMES, TIM, TI, TI$ 
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CLK$ is used with PRINT statements in the DEC BASIC- 
PLUS-2 and the Texas Instruments 990 BASIC to indi- 
cate the time of day in hours (0 to 24), minutes, and 
seconds (hh:mm:ss). The computer automatically inserts 
a colon after the hour and minute values and prints the 
time as a string. 

For example, print clk$ will print a time similar to 
22:19:15, indicating the current time is 10:19 p.m. plus 
15 seconds. 




Function 



TEST PROGRAM 



10 REM 'CUKS' TEST PROGRAM 

20 PRINT "THE CURRENT TIME iS "; 

30 PRINT CUKS 

40 PRINT "'CUKS' PASSED THE TEST IF A SIX DIGIT NUMBER IS PRINTED" 

99 END 



SAMPLE RUN (typical) 



THE CURRENT TIME IS 10:28:45 

'CLKS' PASSED THE TEST IF A SIX DIGIT NUMBER IS PRINTED 

VARIATIONS IN USAGE 
None known. 

ALSO SEE 
CLK,TIME,TIME$,T1,TI$, 
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CLOAD is a special command used by some interpreters 
(e.g. those with Microsoft BASIC) to load a program into 
the computer from a cassette tape. 

TEST PROGRAM 

Enter this program into the computer from the keyboard, 
then store the program on cassette tape. (See CSAVE for 
details.) 

10 REM 'CUOAD' TEST PROGRAM 

20 PRINT "THIS PROGRAM TESTS THE CUOAD FEATURE* 

99 END 




Command 
Statement 



Once the program is recorded on cassette tape, erase the computer memory with NEW, 
SCRATCH, or whatever is appropriate. 

Rewind the tape, then set the recorder to the Play mode and type the CLOAD command. 

The cassette recorder's motor is controlled by the computer which turns it on and off 
before and after the "load" cycle. The cassette should "play back" the program, 
LOADing it into the computer. 

List the program to verify that the program held in the computer's memory is identical 
to that originally entered (see LIST). If all looks well, RUN the program. 

SAMPLE RUN 

THIS PROGRAM TESTS THE CLOAD FEATURE 

CLOAD "program name" is used by some CLOAD-equipped computers to load only that 
program on the cassette that has a matching program name. A program name used to 
identify a specific program may contain more than one letter or number, but the com* 
puter may recognize only the first character. 

Record the TEST PROGRAM onto the cassette using CSAVE" A" (see CSAVE), erase the 
computer memory, then load "A" back into the computer using CLOAD"A". List the 
program to check for possible errors. 

CLOAD? "program name" is used by some CLOAD-equipped computers to compare a 
program stored in the computer's memory with a program stored on cassette under the 
program name indicated. The computer does a bit-by-bit comparison of the two and 
prints an error message if any difference is encountered. This allows you to compare the 
tape with the memory contents to verify that you executed a successful CSAVE, or 
CLOAD, before erasing either. 

Check the TEST PROGRAM on cassette tape (stored with the program name "A") 
against the computer using the CLOAD?"A" command. If an error message is not print- 
ed, the two programs matched. 
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GLOAD 



Add this line to the test program stored in the computer. 

30 REM EXTRA LINE 

Again check the "A" program on cassette tape using the command CLQAD?"A". An 
error message should be printed, indicating the computer found a difference between 
the program stored in the computer and the program stored on tape. 

CLOAD* (array name) is used by a few CLOAD-using computers as a command to load 
an array stored on cassette tape (under the same array name). Example: CLOAD*A 
means "load array A", 

CLOAD*(airay name) can also be used as a program statement so array data can be 
loaded as a program is being executed. 

VARIATIONS IN USAGE 
None other known. 

ALSO SEE 
CSAVE, LIST, CHAIN 
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The CLOG(n) function computes the value of the com- 
mon logarithm of any number (n) whose value is greater 
than 0. 

TEST PROGRAM 

10 REM 'CLOG' TEST PROGRAM 

20 PRINT "ENTER A POSITIVE NUMBER"; 

30 INPUT N 

40 X=CLOG(N) 

50 PRINT "THE COMMON LOG OF";N; M IS ,, ;X 

999 END 




Function 



SAMPLE RUN 

ENTER A POSITIVE NUMBER? 100 
THE COMMON LOG OP 100 IS 2 

If your computer failed the test program, see LOG10 for a substitute subroutine and 
other conversion tips. 

VARIATIONS IN USAGE 
None known. 

ALSO SEE 

LOG10, LGT, LOG, LOGE, LN 
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CLR is used in a few computers (e.g. the APPLE II BASIC 
and the Commodore PET) as an abbreviation for the 
CLEAR command which sets all numeric variables to zero 
and clears all data that may be held by string variables. 

For more information see CLEAR. 



TEST PROGRAM 

10 REM 'CLR' TEST PROGRAM 

20 A=300 

30 A$= M TEST STRING" 

40 PRINT "BEFORE THE 'CUR* STATEMENT A = ";A 

50 PRINT "AND STRING VARIABLE AS = ";AS 

60 CLR 

70 PRINT "AFTER THE 'CUR' STATEMENT A = ";A 

80 PRINT "AND STRING VARIABLE AS = ";A$ 

99 END 




Command 
Statement 



SAMPLE RUN 

BEFORE THE 'CLR' STATEMENT A = 300 
AND STRING VARIABLE AS= TEST STRING 
AFTER THE 'CLR' STATEMENT A - 
AND STRING VARIABLE AS - 

IF YOUR COMPUTER DOESN'T HA VE IT 

Stopping the program and restarting it with RUN almost always resets the variables to 
zero. This is often inconvenient or not practical . The other way to reset them is to write 
them into the program. 

60 A=0 

6! AS =" " 

VARIATIONS IN USAGE 

None known. 

ALSO SEE 

CLEAR, NEW 
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The CLS (clear screen) command is used to perform the 
same function as the CLEAR key on many keyboards. It 
erases the entire screen instantly without disturbing the 
program. CLS can also be used as a program statement to 
clear the screen before starting a graphics display or a new 
"page" of printed information. 

TEST PROGRAM 

10 REM 'CL.S' TEST PROGRAM 

20 FOR X=1 TO 15 

30 PRINT "THIS LINE SHOULD DISAPPEAR'* 

40 NEXT X 

S0CLS 

60 PRINT "IF THIS IS ALL THAT'S ON THE SCREEN" 

70 PRINT "THE CLS STATEMENT PASSED THE TEST" 

99 END 




Command 
Statement 



SAMPLE RUN 

IF THIS IS ALL THAT'S ON THE SCREEN 
THE CLS STATEMENT PASSED THE TEST 

IF YO UR COMPUTER DOESN'T HA VE IT 

Many video screens can be cleared or "erased" by using an ASCII character. Try this 
change to the test program: 

50 PRINT CHR$(24) 

IF CHR$(24) fails (due to nonconformity of some manufacturer's use of ASCII num- 
bers), try this program to search for an ASCII screen-clear: 

TEST PROGRAM 

10 REM ASCII CLEAR SCREEN SEARCH 

20 FOR X=0 TO 128 

30 PRINT "ASCII CODE";X; 

40 PRINT CHRS(X) 

50 FOR Y=1 TO 200 

60 NEXT Y 

70 NEXT X 

99 END 

VARIATIONS IN USAGE 

None other than the use of the CLEAR key. It obviously is of no value with a printer 
terminal. Note that CLS and CLEAR statements are completely different. 

ALSO SEE 

ASCII, CHR$(X) 
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CO is used (by Processor Technology, Harris BASIC -V, 
etc.) as an abbreviation for the CONTinue command, 
which restarts program execution after it was "broken" 
due to a STOP statement, or use of a keyboard "BREAK" 
key. Unlike the RUN command, which causes execution 
to start at the program's beginning, CO resumes execution 
at the line following the break. 

CO has no application as a program statement since it is 
only used when the program has stopped. 




Cornmartd 



TEST PROGRAM 



10 REM 'CO' TEST PROGRAM 

20 PRINT "ENTER THE 'CO' COMMAND" 

30 STOP 

40 PRINT "THE CO COMMAND PASSED THE TEST" 

99 END 



SAMPLE RUN (typical) 

ENTER THE 'CO' COMMAND 

BREAK AT ONE 30 

CO 

THE CO COMMAND PASSED THE TEST 

VARIATIONS IN USAGE 

The Harris BASIC-V allows the CO command to specify a program line to resume pro- 
gram execution. 

For example, co 20 when used with the TEST PROGRAM should resume program 
execution at line 20 (not line 40), This of course is a common feature with the RUN 
command. However, unlike RUN, CO does not reset all variables back to zero before 
resuming execution. 

ALSO SEE 

CONT, CON, STOP, BREAK, RUN, END 
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COLOR is used in the APPLE II BASIC as a special fea- 
ture to specify a color to be displayed on the screen by 
the graphics statements PLOT, HLIN-AT and VLIN-AT. 
The same color is displayed each time a graphics state^ 
ment is executed. To change colors, a new color must be 
specified by the COLOR statement. 

The computer displays 16 different colors, and each is 
assigned a number (from to 15). They are: 

BLACK 8 BROWN 

1 MAGENTA 9 ORANGE 

2 DARK BLUE 10 GRAY 

3 PURPLE 1 1 PINK 

4 DARK GREEN 12 GREEN 

5 GREY 13 YELLOW 

6 MEDIUM BLUE 1 4 AQUA 

7 LIGHT BLUE 15 WHITE 




Command 
Statement 



An equal sign (=) must be placed between COLOR and the COLOR value. This value may 
be a number or a numeric variable. 

For example, color = 13 selects the color yellow for the next graphics statement. 
COLOR can be used as both a command and a program statement. 

TEST PROGRAM 

10 REM 'COLOR' TEST PROGRAM 

20 GR 

30 FOR X=0 TO 15 

40 COLOR - X 

50 Y=X*2 

60 HLIN 0,39 AT Y 

70 NEXT X 

99 END 

SAMPLE RUN 

If your computer accepted the TEST PROGRAM, each of the 1 6 colors should be dis- 
played as a horizontal line across the screen. 

VARIATIONS IN USAGE 

None known. 

ALSO SEE 

GR, PLOT, HLIN-AT, VLIN-AT 
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CON is used in the APPLE II BASIC as an abbreviation 
for the CONTinue command. It restarts program execu- 
tion after it was stopped by pressing the CTRL/C keys. 

For more information see CONT 



TEST PROGRAM 

10 REM 'CON' TEST PROGRAM 

20 PRINT "PRESS CTRL/C TO STOP THE COMPUTER 1 

30 GOTO 30 

99 END 




Command 



SAMPLE RUN 

PRESS CTRL/C TO STOP THE COMPUTER 

Once the computer is stopped with CTRL/C, type "CON". The computer should 
CONtinue program execution, 

VARIATIONS IN USAGE 

CON is used in computers with MAX BASIC to set the value of each element in array 
variables to 1 . 

For example, a=con sets the value of each element in the A array to 1. 

ALSO SEE 

CONT, STOP, END, RUN 
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The CONTinue command restarts program execution after 
it was "broken" due to a STOP statement, or use of a 
keyboard "BREAK" key. Unlike the RUN command, 
which causes execution to start at the program's begin- 
ning, CONT resumes execution at the line following the 
break. 

CONT has no application as a program statement since it 
is only used when the program has STOPped. 

TEST PROGRAM 

10 REM 'CONT' TEST PROGRAM 

20 PRINT "ENTER THE 'CONT' COMMAND" 

30 STOP 

40 PRINT "THE CONT COMMAND PASSED THE TEST" 

99 END 




Command 



SAMPLE RUN 

ENTER THE 'CONT* COMMAND 

BREAK AT 30 

CONT 

THE CONT COMMAND PASSED THE TEST 

VARIATIONS IN USAGE 

None known. 

ALSO SEE 

CON, STOP, END, RUN 
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The COS(A) function computes the COSINE of the angle 
A, when that value is expressed in Radians (not in 
degrees). One radian = approximately 57 degrees. 





Function 



Cosine (COS) is defined as the ratio of the length of the side adjacent to the angle being 
investigated to the length of the hypotenuse, in a right triangle. 

COS(A) = X/H 

The opposite of COS is ARCCOS, ARCCOS (abbreviated ACS) finds the value of the 
angle when its COS, or ratio of sides (X/H) is known. 

TEST PROGRAM 

10 REM 'COS' TEST PROGRAM 

20 PRINT "ENTER AN ANGLE {EXPRESSED IN RADIANS)"; 

30 INPUT R 

40 Y = COS(R) 

50 PRINT "THE COSINE OF A";R;"RAD!AN ANGLE IS";Y 

30999 END 

SAMPLE RUN (for input of 1 ) 

ENTER AN ANGLE {EXPRESSED IN RADIANS)? 1 
THE COSINE OF A 1 RADIAN ANGLE IS „540302 

To convert values from degrees to radians, multiply the angle in degrees times .0174533, 

For example: r-cos(a*.0i 74533) 

To convert values from radians to degrees, multiply radians times 57.29578 

IF YOUR COMPUTER DOESN'T HA VE IT 

If your interpreter does not have the COSine capability, the following subroutine can be 
substituted. 
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r= COS 



The subroutine program you'll find under SIN must be added to this one ake it 

work (saves space not to duplicate it here). 

30000 GOTO 30999 

30350 REM * COSINE SUBROUTINE * INPUT X IN RADIANS, OUTPUT Y 

30352 REM ALSO USES W AND Z INTERNALLY 

30354 X=X*57. 29578 

30356 W = ABS(X)/X 

30358 X=X+90 

30359 GOSUB 30376 

30360 IF Z=~1 THEN 30362 

30361 GOTO 30365 

30362 IP W=I THEN 30364 

30363 GOTO 30365 

30364 Y--Y 

30365 RETURN 



To use the subroutines with the TEST PROGRAM to find the COSine n angle 
(expressed in Radians), make the following TEST PROGRAM changes: 

35X=R 

40 GOSUB 30350 

To find the COSine of an angle (expressed in Degrees), either delete line 30354 change 
line 40 to: 

40 GOSUB 30356 

VARIATIONS IN USAGE 

Some (rare) interpreters convert everything to degrees automatically. 



ALSO SEE 

SIN, ASN, ATN, ATAN, TAN 
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CSAVE is used by some computers (e.g. those with the 
Microsoft interpreter) to record programs from computer 
memory onto cassette tape. 

TEST PROGRAM 

10 REM 'CSAVE' TEST PROGRAM 

20 PRINT "THIS PROGRAM TESTS THE CSAVE FEATURE' 

9 9 END 




Command 



Set up the cassette recorder for Recording and type the command CSAVE. The com- 
puter should control the operation of the cassette recorder by turning the motor on and 
off at the beginning and end of the record cycle. 

Once the program is recorded on cassette tape, type NEW (or whatever is required) to 
clear the program from memory. Load the program from tape back into the computer 
(see ClyOAD). List the program to verify that the program held in the computer's 
memory is identical to that originally entered (see LIST). 

SAMPLE RUN 

THIS PROGRAM TESTS THE CSAVE FEATURE 

CSAVE (program name) is used by some computers using CSAVE to assign a specific 
name to the program being recorded on cassette tape. The file name may contain one or 
more letters, numbers, or other selected ASCII symbols, but only the first character may 
be recognized by the computer. The program name identifies the program for later 
retrieval via the CLOAD (program name) command. 

Record the TEST PROGRAM on cassette tape using the command CSAVE"A", erase the 
memory, then load the program back into the computer using the CLOAD"A" command. 

List the program to check for possible errors. 

VARIATIONS IN USAGE 

None known. 



ALSO SEE 
CLOAD, LIST 
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CSNG is used to change numbers or numeric variables 
which are previously defined as being of "double-precision" 
back to regular "single-precision". Variables listed in the 
CSNG function return to their original double-precision 
status if they are used again without the CSNG function. 

Single-precision variables are capable of storing numbers 

containing no more than 7 digits (only 6 digits are 

printed). Double-precision means being accurate to 17 

digits. If CSNG is used with a double-precision number Function 

containing more than 6 digits, that number is "rounded- 

off ' to six significant places. 

TEST PROGRAM 

10 REM 'CSNG' TEST PROGRAM 

20 DEFDBL X 

30 X=1234567890123456 

40 PRINT "CSNG CHANGES THE VALUE OF X FROM";X;"TO ,, ;CSNG|X) 

50 PRINT "AND BACK TO THE VALUE OF";X;"WHEN REMOVED" 

99 END 



SAMPLE RUN 

CSNG CHANGES THE VALUE OF X FROM 123456789 TO 1.23457E+08 
AND BACK TO THE VALUE OF 123456789 WHEN REMOVED 

VARIATIONS IN USAGE 

None known. 

ALSO SEE 

DEFSNG, DEFDBL, DEFINT, CDBL, !, #, % 
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D is used to indicate "double precision" in numbers 
expressed in "exponential" or "standard scientific nota^ 
tion". 

For example, 1.23456789D+20, Numbers expressed in 
single precision are written in exponential notation using 
the letter "E". 

For example, t .234E+20 
TEST PROGRAM 




Operator 



10 REM 'D' DOUBLE PRECISION EXPONENT TEST PROGRAM 

20 A#=1234567890123456789 

30 PRINT "EXPONENTIAL NOTATION 'D' PASSED THE TEST IF" 

40 PRINT A#; "CONTAINS THE LETTER 'D'" 

99 END 



SAMPLE RUN 

EXPONENTIAL NOTATION 'D' PASSED THE TEST IF 
! .234567890123457D-M6 CONTAINS THE LETTER 'D" 



VARIATIONS IN USAGE 

The letter "D", like all other letters of the alphabet, is used by all computers to indicate a 
numeric variable. 



ALSO SEE 

E,#,!,DEFDBL,DEFSNG 
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D. is used in the TRS-80 Level I as an abbreviation for the 
DATA statement. 

For more details see DATA. 
TEST PROGRAM 

10 REM 'D.' TEST PROGRAM 

20 D. 20 

30 READ A 

40 PRINT "■O.* PASSED THE TEST IN L.1NE";A 

99 END 




Statement 



SAMPLE RUN 

'D.' PASSED THE TEST IN U1NE 20 

VARIATIONS IN USAGE 

None known. 

ALSO SEE 

DATA, DAT, READ 
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DAT is used in the PDP-8E as an abbreviation for the 
DATA statement. 

For more details see DATA. 
TEST PROGRAM 

10 REM 'DAT* TEST PROGRAM 

20 DAT 20 

30 READ A 

40 PRINT " 'DAT' PASSED THE TEST IN L1NE";A 

99 END 




Statement 



SAMPLE RUN 

'DAT' PASSED THE TEST IN LINE 20 

VARIATIONS IN USAGE 

None known. 

ALSO SEE 

DATA, D., READ 
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Statement 



A DATA statement contains data to be read by a READ 
statement. The items in the DATA statement must be 
separated by commas and may include both positive and 
negative numbers. 

TEST PROGRAM 

t0 REM 'DATA* TEST PROGRAM 

20 DATA 20,-10,. 5 

30 READ A,B,C 

40 D=A+B+C 

50 PRINT *'D = ";D 

60 PRINT "DATA PASSED THE TEST IF D = 1 0.5" 

99 END 

SAMPLE RUN 

D - t 0„5 

DATA PASSED THE TEST IFD= 10.5 

Most computers allow strings in a DATA statement. Some require that the strings always 
be enclosed in quotes, while others require quotes only when the string is preceded by, 
encloses, or is followed by a blank, comma or colon. 

TEST PROGRAM 

10 REM 'DATA 1 TEST PROGRAM USING STRINGS 

20 DATA "LINE N UM BER '\20, "PASSED" 

30 READ A$,A,B$ 

40 PRINT "DATA STATEMENT IN ";A$;A;B$;" THE TEST" 

99 END 



SAMPLE RUN 

DATA STATEMENT IN LINE NUMBER 20 PASSED THE TEST 

Remove the quotation marks from the String Variables in line 20 and run again to see if 
they are needed in your interpreter. 

DATA statements may be placed at any location in a program. 

VARIATIONS IN USAGE 

None known. 

ALSO SEE 

DAT, D.JR., REA, READ 
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Statement 



The DEF statement allows the user to DEFine (create) 
new functions (most computers have some built in func- 
tions) which can then be used the same as any intrinsic 
(built in) function. 

For example, def fna(r)) = r*r*3.i4159 The expres- 
sion R*R*3. 14159 (the formula to find the area of a 
circle, normally written 71*2) is DEFined in this example 
as the function FNA. FN (an abbreviation for the word 
FUNCTION) is used in DEF statements followed by any 
legal numeric variable. "A" is used in this example to 
identify function FNA as the Area of a circle, but any variable could have been used. 
Once a function is defined, normally it cannot be redefined in the same program. 

The variable enclosed in parenthesis [(R) above] must match the variable used in the 
statement to the right of the equal sign. These are commonly referred to as "dummy" 
variables. 

The operation stored in the FN (variable) function by the DEF statement can be used to 
manipulate any number or numeric variable. 

For example, 

10 X-2 

20 DEF FNA(N] = 3*N-1 
30 PRINT FNA(X) 

The FN function in this example is named "A" (FNA), and is assigned the equation 
3*N-1 in line 20. The numeric variable (X) following FNA is substituted for the ''dummy 
variable" (N) in the DEF statement each time FNA is executed. 

TEST PROGRAM #1 

10 REM 'DEF' TEST PROGRAM 

20 PRINT "ENTER THE RADIUS OF A CIRCLE (IN INCHES)"; 

30 INPUT R 

40 DEF FNC(X)-3*1 .41 59*X 

50 PRINT "THE CIRCUMFERENCE OF A CIRCLE" 

60 PRINT "WITH A RADIUS O F" ;R ;"I NCHES IS" ;FNC{ R ) ;'MNC HES" 

99 END 



SAMPLE RW (using 4) 



ENTER THE RADIUS OF A CIRCLE {IN INCHES)? 4 

THE CIRCUMFERENCE OF A CIRCLE 

WITH A RADIUS OF 4 INCHES IS 25.1327 INCHES 
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DEF =============^^ 

Some computers allow more than one variable in the DEFined expression. Each of these 
variables must be listed after the FN(variable) function. 

TEST PROGRAM #2 

10 REM 'DEF' MULTIPLE VARIABLE TEST PROGRAM 

20 DEF FN(X,Y) = (X+Y)/2 

30 PRINT "ENTER ANY TWO NUMBERS"; 

40 INPUT X,Y 

50 A=DEF(X,Y) 

60 PRINT "THE AVERAGE O F";X;" AN D" ;Y ;"1S" ;A 

999 END 

SAMPLE RUN (using 20 and 40) 

ENTER ANY TWO NUMBERS? 20,40 
THE AVERAGE OF 20 AND 40 IS 30 

Some computers allow the same function to be DEFined in more than one line. In the 
following TEST PROGRAM the function FNA is DEFined as X*2 if the value of variable 
X is less than 10, or as X/2 if the value of X is greater than or equal to 10. 

TEST PROGRAM #3 

10 REM 'DEF' REQUIRING MORE THAN ONE LINE 

20 PRINT "ENTER A VALUE FOR X THAT IS GREATER OR LESS THAN 10"; 

30 INPUT X 

40 DEF FNA(X) 

50 FNA=X*2 

60 IF X < 10 THEN 80 

70 FNA=X/2 

80 FNEND 

90 PRINT "THE NEW VALUE FOR X IS";FNA(X) 

999 END 



SAMPLE RUN (using 12) 

ENTER A VALUE FOR X THAT IS GREATER OR LESS THAN 1 0? 1 2 
THE NEW VALUE FOR X IS 6 

The FNEND statement in the last TEST PROGRAM tells the computer to stop defining 
function FNA. Multiple line DEF statements must always end with the FNEND state- 
ment, and the computer does not allow branching into or out of multiple line DEF state- 
ments, For more information see FNEND. 
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DEF 

IF YOUR COMPUTER DOESN'T HA VE IT 

If your computer does not have the DEF capability, substitute FN with a subroutine 
containing the same equation. 

For example, The DEF statement in TEST PROGRAM #2 can be replaced with the fol- 
lowing subroutine: 

100 A=«(X+Y)/2 
1 10 RETURN 

and these TEST PROGRAM CHANGES: 

Delete line 20 and add 

50 GOSUB 100 
70 GOTO 999 

VARIATIONS IN USAGE 

None other known. 

ALSO SEE 

FN, FNEND, GOSUB 
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DEFDBL is used to define (declare) a variable or variables 
as being accurate to "double-precision". Double-precision 
variables are capable of storing numbers accurate to 17 
digits (only 16 digits are printed). Single-precision vari- 
ables are typically accurate to 6 digits. 

Caution: DEFDBL should only be used where single- 
precision accuracy is not adequate since double-precision 
variables require more memory space and their manipula- 
tion requires more time. In most computers the DEFDBL 
line must be executed before the variable listed in the 
DEFDBL statement is assigned a numeric value. 

TEST PROGRAM 




Statement 



10 REM 'DEFDBL' TEST PROGRAM 

20 A=1. 234567890123456 

30 PRINT "DEFDBL IN LINE 50 CHANGED THE VALUE OF VARIABLE 'A ,M 

40 PRINT "FROM";A;"TO" ; 

50 DEFDBL A 

60 A=l. 2345678901 23456 

70 PRINT A 

99 END 

SAMPLE RUN 

DEFDBL IN LINE 40 CHANGED THE VALUE OF VARIABLE 'A' 
FROM 1.23457 TO 1,23456 7890123456 

Most computers with DEFDBL capability also allow designation of more than one vari- 
able as "double-precision" by a single DEFDBL statement. For example, defdbl a.f.m 
defines the variables A, F and M as having double-precision, and defdbl a-m defines 
all variables A thru M as being of double-precision. 

TEST PROGRAM 

10 REM 'DEFDBL' (WITH MULTIPLE VARIABLES) TEST PROGRAM 

20 DEFDBL A.G.L-N 

30 A=1/3 

40 G^2/3 

50 L=1/9 

60 M=K2345678901234567D + 38 

70 N=-1.2345678901234567D + 38 

80 PRINT "DEFDBL PASSED THE TEST IF THE FOLLOWING" 

90 PRINT "NUMBERS CONTAIN MORE THAN 7 DIGITS:" 

100 PRINT A;G;L;M;N 
999 END 
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DEFDBL s 

SAMPLE RUN 

DEFDBL. PASSED THE TEST IF THE FOLLOWING 
NUMBERS CONTAIN MORE THAN 7 DIGITS: 

,3333333333333333 .666666 66 666666 7 .1111111111111111 

1.2345678901 2345 7D + 38 1 ,23456 7890 1 23457D+3 8 

The "D" before "+38" is the same as an "E" in exponential notation, but signifies that 
the number is "double -precision accurate". 

Some computers may not print the first three values as shown in the SAMPLE RUN due 
to pecularities in the interpreter's bit manipulation. This problem can be eliminated in 
computers that have a Double Precision Declarative sign (e.g. the # sign). Place the sign 
after each fraction in lines 30,40 and 50 as follows to produce the correct results. 

30 A 1/3 # 
40 G 2/3 # 
50 L, l/9# 

VARIATIONS IN USAGE 
None known. 



ALSO SEE 

DEFSNG, DEFINT, # 
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DEFINT is used to define (declare) that the variables list- 
ed by the DEFINT statement are integers. Variables 
defined as integers store the integer (whole number) 
value of assigned numbers. This is especially useful in large 
programs since less memory is required to store integer 
values than non-integers. 

A potential disadvantage of using the DEFINT statement 
is the inability of many interpreters to process numeric 
values larger than that allowed by the interpreter's INT 
function (typically -32767 to +32767). 




Statement 



The DEFINT line must be executed by the computer before a variable listed in the 
DEFINT statement is assigned a numeric value. 

TEST PROGRAM 

10 REM 'DEFINT' TEST PROGRAM 

20 DEFINT A 

3 A=12.68 

40 B=12.68 

50 IF A=12 THEN 70 

60 GOTO 80 

70 IF B=12„68 THEN 100 

80 PRINT "DEFINT FAILED THE TEST LINE 20" 

90 GOTO 999 

100 PRINT "THE DEFINT STATEMENT PASSED THE TEST IN LINE 20 BY" 

110 PRINT "CHANGING THE VALUE OF VARIABLE A FROM" ;B |"TO" ;A 

999 END 

SAMPLE RUN 

THE DEFINT STATEMENT PASSED THE TEST IN LINE 20 BY 
CHANGING THE VALUE OF VARIABLE A FROM 1268 TO 12 

Most computers with DEFINT capability also allow assignment of multiple variables 
(separated by comma) in a single DEFINT statement. For example, defint a.f.m 
defines the variables A,F and M as integers, defint a-m defines variables A thru M as 
integers. 

TEST PROGRAM 

10 REM 'DEFINT' (WITH MULTIPLE VARIABLES} TEST PROGRAM 
20 DEFINT A.G.L-N 
30 A = 6.2S 
40 8 = 21„42 
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DEFBNT 



50 G=-6„1 9 

60 L=4„001 

70 M = 32000999 

80 N = 14„8 

90 PRINT "IF THE NU MBERS" ;A ;G;L;M ;N ;" ARE INTEGERS," 

100 PRINT "AND THE NUM BER" ;B ;"IS A DECIMAL, THEN DEFINT" 

1 10 PRINT "PASSED THE MULTIPLE VARIABLE TEST IN LINE 20." 

999 END 

SAMPLE RUN 

IP THE NUMBERS 6-7 4 32000 14 ARE INTEGERS, 
AND THE NUMBER 21,42 IS A DECIMAL, THEN DEFINT 
PASSED THE MULTIPLE VARIABLE TEST IN LINE 20. 

If the interpreter has a double-precision declarative character (e.g. the # sign in the Micro- 
soft BASIC), and this character is assigned to a variable that is listed in the DEFINT state- 
ment, the variable is treated as double precision because Double Precision Declarative 
Characters over-ride the DEFINT statement. 

TEST PROGRAM 

10 REM 'DEFINT* TEST PROGRAM 

20 REM USES DOUBLE-PRECISION TYPE DECLARATION CHARACTER'*' 

30 DEFINT A,B 

40 A = 9, 123456789012345 

50 B#=9. 123456789012345 

60 IF A = B# THEN 1 10 

70 PRINT "A = ";A 

80 PRINT "B# = ";B# 

90 PRINT "THE TEST PASSED, SHOWING # OVER-RIDING DEFINT" 

100 GOTO 999 

110 PRINT "THE # CHARACTER OVER-RIDE FEATURE FAILED THE TEST" 

999 END 

SAMPLE RUN 

A = 9 

B# = 9.123456789012345 

THE TEST PASSED, SHOWING # OVER-RIDING DEFINT 

VARIATIONS IN USAGE 
None known. 



ALSO SEE 
INT,#,DEFSNG,DEFDBL 
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DEFSNG is used to define (declare) specified variables as 
being of "single precision". Single precision variables are 
capable of storing numbers containing no more than 7 
digits (only 6 digits are printed). Double precision means 
having 16-digit precision. 

Since most interpreters automatically treat variables as 
having single precision, the DEFSNG statement is used in 
programs to redefine variables as having only single pre- 
cision after one or more were defined as double precision Statement 
by a previous DEFDBL statement or # operator. 

In most computers the DEFSNG line must be executed before the variable listed in the 
DEFSNG statement is assigned a numeric value. Line 20 below declares both X and Y to 
be maintained with double precision. 

TEST PROGRAM 

10 REM 'DEFSNG' TEST PROGRAM 

20 DEFDBL X,Y 

30 X=t. 234567890123456 

40 Y=X 

50 PRINT "DOUBLE PRECISION VALUE OF Y = ";Y 

60 DEFSNG Y 

70 Y^X 

80 PRINT "SINGLE PRECISION VALUE OF Y=";Y 

99 END 

SAMPLE RUN 

DOUBLE PRECISION VALUE OF Y = 1.234567890123456 
SINGLE PRECISION VALUE OFY= 1,23457 

Most computers with DEFSNG capability also allow assignment of multiple variables 
(separated by comma) in a single DEFSNG statement. For example, defsng a,f\m 
defines the variables A, F and M as single precision, and defsng a-m defines all vari- 
ables A thru M as single precision. 

TEST PROGRAM 

10 REM 'DEFSNG* (WITH MULTIPLE VARIABLES) TEST PROGRAM 

20 DEFDBL A,G,L-N 

30 GOSUB 200 

40 PRINT "THE DOUBLE PRECISION VALUES OF A t G,L,M AND N ARE" 

50 PRINT A;G;L;M;N 

60 DEFSNG A.G.L-N 

70 GOSUB 200 

80 PRINT "THE SINGLE PRECISION VALUES OF A.G.L.M AND N ARE" 
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DEFSNG 



90 PRINT A;G;L;M;N 

100 GOTO 999 

200 REM SUBROUTINE 

210 A=1234. 567890 

220 G = A/10 

230 L=G/10 

240 M~L/l 

250 N = M/10 

260 RETURN 

999 END 

SAMPLE RUN 

THE DOUBLE PRECISION VALUES OF A.G.L.M AND N ARE 
1234,56789 123.456789 12,3456789 1,23456789 .123456789 

THE SINGLE PRECISION VALUES OF A,G t L,M AND N ARE 
1234.57 123457 12.3457 1.23457 ,123457 

An Over-Riding Operator 

If the interpreter provides for a double precision declarative character (e.g. the # in the 
MICROSOFT Basic), and this character is shown with a variable that is listed in the 
DEFSNG statement, the double precision character over-rides the action of the DEFSNG 
statement and declares the variable to be double precision. See line 50 below, 

TEST PROGRAM 

10 REM 'DEFSNG' TEST PROGRAM 

20 REM USES DOUBLE PRECISION DECLARATION CHARACTER '#' 

30 DEFSNG A,B 

40 A=1 ,2345678901 23456 

50 B#=M. 234567890123456 

60 IF A=B# THEN 1 1 

70 PRINT "A = ";A 

80 PRINT "B#~";B# 

90 PRINT "THE TEST PASSED WITH # OVER-RIDING DEFSNG" 

100 GOTO 999 

110 PRINT "THE # CHARACTER OVER-RIDE FEATURE FAILED THE TEST" 

999 END 

SAMPLE RUN 

A = 1.23457 

B# = 1.234567890123456 

THE TEST PASSED WITH # OVER-RIDING DEFSNG 

VARIATIONS IN USAGE 

None known, 
ALSO SEE 
DEFINT, #, DEFDBL, !, CSNG, CDBL, CINT 
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The DEFSTR statement is used to specify designated 
variables as string variables. A variable listed in the 
DEFSTR statement is treated the same as if it was defined 
as a string variable by the $ (string) sign. 

It is important in large programs to specify only those 
variables that need string storage, since string variables 
require more memory space than numeric variables. 

The DEFSTR line must be executed before the defined 
variable is assigned a string notation. 




Statement 



TEST PROGRAM 

10 REM 'DEFSTR' TEST PROGRAM 

20 A = 25 

30 PRINT "NUMERIC STRING A =";A 

40 DEFSTR A 

50 A="TEST STRING" 

60 PRINT "STRING VARIABLE A - ";A 

99 END 

SAMPLE RUN 

NUMERIC STRING A - 25 

STRING VARIABLE A - TEST STRING 

Most computers with DEFSTR capability also allow assignment of multiple variables 
(separated by comma) by a single DEFSTR statement. For example, defstr a.f.m de- 
fines the variables A, F, and M as string variables, defstr a-m defines all variables A 
thru M as string variables. 

TEST PROGRAM 

10 REM DEFSTR (WITH MULTIPLE VARIABLES) TEST PROGRAM 
20 DEFSTR A,G,L-N 

30 A="DEFSTR " 

40 G="PASSED THE " 

50 ^"MULTIPLE VARIABLE " 

60 M-"TEST " 

70 N = "IN LINE 20." 

80 PRINT A;G;L;M;N 

99 END 



SAMPLE RUN 



DEFSTR PASSED THE MULTIPLE VARIABLE TEST IN LINE 20. 



73 



DEFSTR 



Some interpreters require that space be reserved in memory for the assigned strings using 
the DIM or CLEAR statements. 

Interpreters with declarative characters (e.g. D, E, %, #, or !) take precedence over the 
DEFSTR function when added to variables listed in the DEFSTR statement. This feature 
can be tested by making these changes to the second TEST PROGRAM. 

70 N~"IN LINE" 

80 PRINT A;G;L;M;N; 

85 AI-20 

90 PRINT AI 

The single-precision declarative character (!) added to lines 85 and 90 should over-ride the 
DEFSTR statement in line 20 and print the sample run, 

VARIATIONS IN USAGE 
None known. 



ALSO SEE 

DEFDBL, DEFINT, DEFSNG, DIM, CLEAR, $, D (exponential notation), E (exponen- 
tial notation), % (integer operator), # (double precision) and ! (single precision). 
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DEG is used by a few computers (e.g. the Crornemco 16K 
Extended BASIC) as a command which causes the com- 
puter to execute trigonometric functions in degrees 
(rather than in radians). One degree = approximately .02 
radians. 



TEST PROGRAM 

10 REM 'DEG COMMAND' TEST PROGRAM 
20 A^S1N{1.4) 

3 PRINT "THE SINE OF 1.4 RAOIANS IS"; A 
99 END 




Command 
Function 



SAMPLE RUN 

As shown above, the computer will execute the program and compute the sine of an angle 
of 1.4 radians. 

THE SINE OF f .4 RADIANS IS .98545 

Type the command DEG and then RUN- The computer will compute the sine of the 
angle 1.4 converted to DEGrees. 

THE SINE OF 1.4 RADIANS IS .024432 

To change the computer back to the radian mode, type RAD or SCR. (SCR will also 
SCRatch the entire program.) 

IF YOUR COMPUTER DOESN'T HA VE IT 

If your computer does not have the DEG command, it can be simulated in the program 
instead by multiplying radian values times .0174533. To use this conversion in the first 
TEST PROGRAM, make this program change: 

20 A=S1N(1.4*. 0174533} 

VARIATIONS IN USAGE 

A few computers (e.g. those using MAX BASIC) have DEG(n) as an intrinsic function to 
convert a value (n) expressed in radians to degrees. 
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DEG = 

TEST PROGRAM 



10 REM 'DEG FUNCTION* TEST PROGRAM 

20 PRINT "ENTER AN ANGLE (EXPRESSED IN RADIANS)"; 

30 INPUT A 

40 B=DEG(A] 

50 PRINT "THE RADIAN ANGLE OF";A;"IS EQUAL TO" ;B ;"DEG RE ES" 

99 END 

SAMPLE RUN (using 1.4) 

ENTER AN ANGLE (EXPRESSED IN RADIANS)7 t .4 

THE RADIAN ANGLE OF 1.4 IS EQUAL TO 80.2141 DEGREES 

IF YOUR COMPUTER DOESN'T HAVE IT 

If your computer does not have the DEG function, it can be simulated by multiplying the 
radian values times 57,29578. To use this conversion in the second TEST PROGRAM, 
make this program change; 

40 B=A*57„29578 

ALSO SEE 

SIN, SINE, COS, TAN, ATN 
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DEL is used as an abbreviation for the DELETE command 
to "erase" specified program lines from the computer's 
memory. 

For more information see DELETE. 
TEST PROGRAM 

10 REM 'DEL* TEST PROGRAM 
20 PRINT "LINE 20" 
30 PRINT "LINE 30" 
99 END 




Command 



Run the program to ensure that ail lines are properly entered. 
SAMPLE RUN 

LINE 20 
LINE 30 

Type the command DEL 20 and run the program. This command should have eliminated 
the printing of "LINE 20". Check by LISTing and RUNning, 

VARIATIONS IN USAGE 

None known . 

ALSO SEE 

DELETE, LIST 
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The DELETE command is used to "erase" specified pro- 
gram lines from the computer's memory, 

TEST PROGRAM 

10 REM 'DELETE' TEST PROGRAM 

20 PRINT "LINE 20" 

30 PRINT "LINE 30" 

40 PRINT "LINE 40" 

50 PRINT "LINE 50" 

60 PRINT "LINE 60" 

70 PRINT "LINE 70 - END OF DELETE TEST" 

99 END 




Command 



RUN the program to ensure that all lines are properly entered. 
SAMPLE RUN 

LINE 20 
LINE 30 
LINE 40 
LINE 50 
LINE 60 
LINE 70 - END OF DELETE TEST 

A single program line can be eliminated from the computer's memory using the command 
DELETEfline number). To test this feature, try the command deleteb0 and run the 
program. This command should have eliminated the printing of "LINE 50". Check by 
LISTing and RUNning. 

More than one program line can be eliminated from memory by some computers using 
the command DELETE(line#-line#). All line numbers within the range specified by this 
command are eliminated., To test this feature, try the command delete 30-4 0, then 
RUN the program. Lines 30 and 40 should be gone. 

DELETE-(line number) is used by some computers to eliminate all line numbers from the 
first line number in the program to the line number specified in the DELETE command. 
To test this feature, try the command delete~60 and run the program. All lines should 
be eliminated except line 70 and 99. 

Some computers with the DELETE feature allow eliminating of groups of line numbers 
plus individual line numbers by use of commas. 

For example, delete 20,40-50,90 eliminates lines 20, 40, 50 and 90 from the pro- 
gram. To test for this feature, re-enter the test program and try the command delete 
20, 40-60. LIST the program to verify that all lines except 10, 30, 70 and 99 have been 
eliminated. 
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r= DELETE 



A few computers use DELETE(iine number)- to eliminate all line numbers starting from 
the line number specified in the DELETE command to the end. To test for this feature, 
try the command delete 30-. LIST the program to verify that only line 10 remains. 

IF YOUR COMPUTER DOESN'T HAVE IT 

If your computer does not have the DELETE command, the same thing can be accom- 
plished by typing each line number individually, followed by pressing the ENTER or 
RETURN key. To eliminate all line numbers in one operation, use the NEW or 
SCRATCH command. 

ALSO SEE 

NEW, LIST 
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The DIMension statement is used to establish the number 
of elements allowed in a numeric or string array. 



An array DIMension is established by placing the array 
variable after the DIM statement, followed by the array 
size enclosed in parenthesis. 



For example, dim A(a0) allows array variable A to use 
the 21 array elements from A(0) to A(20). [Some com- Statement 

puters start with array element A(l), while a few com- 
puters (e.g. those conforming to ANSI BASIC and MAX BASIC) can define the lowest 
array element as either or 1 by using the BASE statement. For more information see 
BASE.l 




When the DIM statement is executed, the computer sets the values stored in each desig- 
nated array element to zero. 

TEST PROGRAM 

10 REM DIM* NUMERIC ARRAY TEST PROGRAM 

20 DIM A{10) 

30 PRINT "THESE NUMBERS ARE STORED IN AND PRINTED" 

40 PRINT "FROM A SINGLE DIMENSION NUMERIC ARRAY." 

50 FOR X=1 TO 10 

60 A(X) = X 

70 PRINT A{X); 

8 NEXT X 

99 END 

SAMPLE RUN 

THESE NUMBERS ARE STORED IN AND PRINTED 
FROM A SINGLE DIMENSION NUMERIC ARRAY, 
12345678910 

To check your interpreter's ability to use array elements starting at 0, make this change 
in the TEST PROGRAM: 

50 FOR X=0 TO 10 

If your interpreter accepted the array element A(0), a SAMPLE RUN should print num- 
bers from to 10. 

Most computers allow each array to use elements from (or 1) to 10 without the need 
for DIMensioning. Delete line 20 from the TEST PROGRAM to test for* this capability. 

If it works, make this change in line 50: 
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DIM 



5 FOR X=t TO 15 

and RUN. Since a few computers (e.g. TRS-80 Level I) do not require any dimensioning, 
their array size is automatically limited only by the amount of unused memory. TRS-80 
Level I only allows arrays named A(n) and B(n). Most computers allow the full ranee of 
Alphabetic variables, and many allow arrays to have Alpha/Numeric array names [e.g. 
A3(n)]. 

Assuming that line 50 change above caused a crash, make this change to line 20: 

20 DIM A{1 5} 

and RUN 
SAMPLE RUN 

THESE NUMBERS ARE STORED IN AND PRINTED 
FROM A SINGLE DIMENSION NUMERIC ARRAY. 

1 23456 789 10 11 12 13 14 15 

This next program tests the computer's ability to DIMension string arrays. Some com- 
puters (e.g. Hewlett-Packard) require dimensioning of ail strings, including string arrays, 
with no string space set aside without DIM. 

TEST PROGRAM 

10 REM 'DIM' STRING ARRAY TEST PROGRAM 

20 DIM A$(4) 

30 FOR X = 1 TO 4 

40 READ A$(X) 

50 NEXT X 

60 PRINT "THE 'DIM' STATEMENT PASSED THE "; 

70 FOR X=1 TO 4 

80 PRINT A$(X); 

9 NEXT X 

100 DATA T,E,S,T 

999 END 

SAMPLE RUN 

THE 'DIM" STATEMENT PASSED THE TEST 

DIM is also used in some computers to set the maximum element size for numeric and 
string arrays which contain two dimensions (or more). 

For example, dim a{20,25) establishes the maximum size of the first dimension at 20, 
and the second at 25. 
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DIM 



Most computers with two and three dimension array capability automatically reserve 
space for 10 elements in each dimension. Many smaller computers (e.g. Microsoft inter- 
preter variations) reserve element space for only the first and second dimension. 

TEST PROGRAM 

10 REM 'DIM' TWO DIMENSION ARRAY TEST PROGRAM 

20 DIM A{3,4) 

30 PRINT "THESE NUMBERS ARE STORED IN AND PRINTED" 

40 PRINT "FROM A TWO DIMENSION NUMERIC ARRAY." 

50 FOR 1^1 TO 3 

60 FOR J*=l TO 4 

70 A(l,J) = l 

80 NEXT J 

90 NEXT 1 

100 FOR 1 = 1 TO 3 

1 10 FOR J=1 TO 4 
120 PRINT A(I,J), 
130 NEXT J 

140 PRINT 
150 NEXT I 
999 END 

SAMPLE RUN 

THESE NUMBERS ARE STORED IN AND PRINTED 

FROM A TWO DIMENSION NUMERIC ARRAY, 

1111 

2 2 2 2 

3 3 3 3 

TEST PROGRAM 

This program tests the computer's ability to DIMension three dimension numeric array 
variables. 

10 REM 'DIM' THREE DIMENSION ARRAY TEST PROGRAM 

20 DIM A(3,4,2) 

30 PRINT "THESE NUMBERS ARE STORED IN AND PRINTED" 

40 PRINT "FROM A THREE DIMENSION NUMERIC ARRAY," 

50 FOR K=l TO 2 

60 FOR 1^1 TO 3 

70 FOR J«*l TO 4 

80 A(I,J,K)-I 

90 NEXT J 

100 NEXT I 

1 10 NEXT K 
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DIM 



120 FOR K=l TO 2 
130 FOR 1 = 1 TO 3 
140 FOR J=1 TO 4 
150 PRINT A(I,J,K), 
1 60 NEXT J 
1 70 NEXT I 
1 80 PRINT 
190 NEXT K 
999 END 

SAMPLE RUN 

THESE NUMBERS ARE STORED IN AND PRINTED 
FROM A THREE DIMENSION NUMERIC ARRAY. 

1111 

2 2 2 2 

3 3 3 3 

1111 

2 2 2 2 

3 3 3 3 

VARIATIONS IN USAGE 

None other known. 

ALSO SEE 

CLEAR, MAT INPUT, MAT PRINT, MAT READ 
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DSP is used in the APPLE II BASIC as an analytical tool 
to display a specific variable and its value each time the 
variable is assigned a value. The variable's associated line 
number is also displayed preceded by a # sign. More than 
one DSP statement is allowed in a program. 

For example: 

10 DSP X 
20 DSP Y 




Statement 



instructs the computer to display (print) variables X and Y, and their values, along with 
the line numbers each time they are assigned or reassigned a value. 

TEST PROGRAM 

10 REM 'DSP* TEST PROGRAM 
20 DSP A 
30 DSP B 
40 A = 5 
50 B=10 
60 C~A*B 
70 A=A + C 

80 PRINT "THE DSP STATEMENT PASSED THE TEST" 
99 END 

SAMPLE RUN 

#40 A^S 

#50 B=10 

#70 A = 55 

THE DSP STATEMENT PASSED THE TEST 

IF YOUR COMPUTER DOESN'T HA VE IT 

This very handy troubleshooting feature can be duplicated by adding a temporary test 
line at each point where the variable being traced is changed. For example, 

10 REM DSP SIMULATION 

40 A = 5 

41 PRINT "#40 A=";A 
50 B=t 
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DSP 



SI PRINT "#50 B-";B 
60 C=A*B 

70 A=A+C 

71 PRINT "#70 A=";A 

80 PRINT "END OF THE DSP SIMULATION' 
99 END 

VARIATIONS IN USAGE 

None known. 

ALSO SEE 

TRON, TRACE 
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E is used to indicate "exponential notation", or "standard 
scientific notation". 

For example, 1 .23E+ 1 z means 1 .23 followed by 1 2 zeros. 

Numbers expressed in double precision are written in 
exponential notation using the letter "D". 

For example, i .23456789D+20 




Operator 



TEXT PROGRAM 



10 REM 'E' SINGLE PRECISION EXPONENT TEST PROGRAM 

20 A=l 23456789 

30 PRINT -'EXPONENTIAL- NOTATION'S' PASSED THE TEST IF' 

40 PRINT A;"CONTA1NS THE LETTER 'E'" 

99 END 



SAMPLE RUN 



EXPONENTIAL NOTATION 'E' PASSED THE TEST IF 
1.23457E+08 CONTAINS THE LETTER 'E' 



VARIATIONS IN USAGE 

The letter "E", like all other letters of the alphabet, is used by all computers to indicate 
a numeric variable. 



ALSO SEE 

D, !, #,DEFSNG,DEFDBL 
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E. is used in the TRS-80 Level I as an abbreviation for the 
END statement. 

For more information see END. 



TEST PROGRAM 

10 REM 'E. {END} 1 TEST PROGRAM 

20 PRINT "THE COMPUTER SHOULD ONLY PRINT THIS LINE*' 

30 E. 

40 PRINT "IF THIS LINE IS PRINTED THE TEST FAILED" 

99 END 




Statement 



SAMPLE RUN 

THE COMPUTER SHOULD ONLY PRINT THIS LINE 

VARIATIONS IN USAGE 

None known. 

ALSO SEE 

END 
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EDIT is a special command used by some computers (e.g. 
those using Microsoft BASIC) which allows editing of the 
program line specified by the EDIT command. (It is simi- 
lar to the RUN and LIST commands in that if no number 
follows it, the first program line is automatically implied.) 

TEST PROGRAM 

10 REM 'EDIT' TEST PROGRAM 

20 PRINT "CAN THIS PROGRAM BE MODIFIED** 

30 PRINT "BY THE EDIT COMMAND7" 

99 END 




Command 



After loading this program, type edit 20 to determine if the computer has the EDIT 
feature. The computer should print the number 20 followed possibly by a cursor. This 
indicates the computer is in the EDIT mode and is ready to modify line 20. 

VARIATIONS IN USAGE 

There are many versions of text, character and line editors. They each speak their own 
"language," and it is not BASIC. This Handbook will therefore not cover Editor languages. 

The EDIT command may call up your editor, but you'll have to check the machine's 
manual to see how to perform the editing and get back into BASIC. Sometimes it's as 
easy as hitting the carriage return. Other times (especially on large multi-language time- 
sharing machines) it takes a whole series of commands to get in and out of the "editor". 
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ELSE is used to execute an alternate statement when the 
condition of an IF-THEN statement is not met. For 
example, if x=3 then t 00 else stop instructs the 
computer to branch to line 100 if X equals 3, but STOP if 
X does not equal 3. 

TEST PROGRAM 

10 REM 'ELSE' TEST PROGRAM 

20 X=l 

30 IF X < 5 THEN 60 EL.SE GOTO 90 

40 PRINT, "ELSE FAILED THE TEST" 

50 GOTO 99 

60 PRINT X; 

70 X~X-M 

80 GOTO 30 

90 PRINT "'ELSE' PASSED THE TEST" 

99 END 




Statement 



SAMPLE RUN 



12 3 4 'ELSE* PASSED THE TEST 



IF YOUR COMPUTER DOESN'T HAVE IT 

If your computer does not have the ELSE statement, it can be simulated in the test pro- 
gram by changing line 30 to 30 if x < 5 then 60 and adding the following new line. 

35 GOTO 90 



VARIATIONS IN USAGE 

None known. 

ALSO SEE 
IF-THEN, GOTO 
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The END statement is used to terminate execution of the 
program. Many computers require it to be placed at the 
highest line number in the program, while others accept it 
at any point. 

The END statement is optional with many computers 
(mostly micros). 

TEST PROGRAM 

10 REM 'END' TEST PROGRAM 

20 PRINT "THE FIRST END STATEMENT FOLLOWS" 
30 END 
* 40 PRINT "THE SECOND END STATEMENT FOLLOWS" 

99 END 




Statement 



SAMPLE RUN 



THE FIRST END STATEMENT FOLLOWS 



If your computer does not pass this test and will not allow an END statement at line 30, 
then delete line 30 and run the program again. 

Then delete line 99 to see if your computer accepts END as an optional statement. 

ALSO SEE 

STOP (for the many problems encountered when using END and STOP in the same 
program). 
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EQ is used in a few computers (e.g. the T.I. 990) as an 
optional word for the equal sign (=). 

For more information see =. 



TEST PROGRAM 

10 REM 'EQ {EQUAL)' TEST PROGRAM 

20 A EQ 1 

30 IF A EQ 10 THEN 60 

40 PRINT "THE EQ OPERATOR FAILED THE TEST' 

50 GOTO 99 

60 PRINT "THE EQ OPERATOR PASSED THE TEST 

99 END 




Operator 



SAMPLE RUN 

THE EQ OPERATOR PASSED THE TEST 

VARIATIONS IN USAGE 

None known. 

ALSO SEE 

=, <>, IF-THEN 
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The ERL function is used with the ON-ERROR statement 
to identify the last line number in which an error has 
occurred. 

The ERL function initializes at the numeric line number 
value of 65535 (the maximum two-byte value). When an 
error occurs, ERL changes to the line number in which 
the error occurred. The line number contained in the ERL 
function changes each time an error occurs in a different 
line. 




Function 



By using ERL in "error-trapping" routines, it is possible to identify the "errored" line 
and take appropriate action. 

TEST PROGRAM 



10 REM 'ERL' TEST PROGRAM 

20 ON ERROR GOTO 100 

30 PRINT "ENTER THE NUMBER 10, 20, THEN 30"; 

40 INPUT N 

50 A=10/(N-10) 

60 A=10/(N-20) 

70A=10/(N-30) 

80 PRINT "THE NUMBER ";N;"D1D NOT CAUSE AN ERROR" 

90 GOTO 30 

100 PRINT "AN ERROR HAS JUST OCCURRED IN LINE"; ERU 

110 RESUME 30 
999 END 

SAMPLE RUN 

ENTER THE NUMBER 10, 20, THEN 3 0? 10 
AN ERROR HAS JUST OCCURRED IN LINE 50 
ENTER THE NUMBER 10, 20, THEN 3 0? 20 
AN ERROR HAS JUST OCCURRED IN LINE 60 
ENTER THE NUMBER 10, 20, THEN 30? 30 
AN ERROR HAS JUST OCCURRED IN LINE 70 
ENTER THE NUMBER 10, 20, THEN 30? 

VARIATIONS IN USAGE 
None known. 

ALSO SEE 

ERROR, ON-ERROR-GOTO, RESUME 
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ERR is used in some computers (e.g. those with Microsoft 
BASIC) to identify the error code of the last error which 
occurred in a program. The error code contained in the 
ERR function changes each time a different error occurs. 
By using ERR in "error-trapping" routines, it is possible 
to identify the type of error which occurred and take 
appropriate action. Refer to the computer's manual for a 
listing of its particular error codes. 

TEST PROGRAM 




Function 



10 REM 'ERR' TEST PROGRAM 

20 DIM A(S) 

30 CLEAR 

40 ON ERROR GOTO 100 

50 PRINT "ENTER A SAMPLE NUMBER"; 

60 INPUT N 

70 A(N)=10/N 

80 PRINT "THE N UM BER ";N ;"D1 D NOT CAUSE AN ERROR" 

90 GOTO 50 

100IFERR^9THEN 130 

I10IFERR= 11 THEN 160 

120 GOTO 180 

130 PRINT "THE N U M BER" ;N ;" IS TOO LARGE" 

140 PRINT "USE A NUMBER BETWEEN 1 AND 5" 

150 RESUME 30 

160 PRINT "THE SMALLEST NUMBER ALLOWED IS 1" 

1 70 RESUME 

180 PRINT "THE NUMBER";N;"CAUSED AN ERROR CODE OF";ERR 

999 END 



SAMPLE RUN (Typical) 



ENTER A SAMPLE NUMBER? 12 

THE NUMBER 12 IS TOO LARGE 

USE A NUMBER BETWEEN 1 AND 5 

ENTER A SAMPLE NUMBER? 

THE SMALLEST NUMBER ALLOWED IS 1 

THE NUMBER 1 DID NOT CAUSE AN ERROR 

ENTER A SAMPLE NUMBER? 



VARIATIONS IN USAGE 

The TRS-80 Level II BASIC stores a value in the ERR function that does not equal the 
actual error code. To convert the value stored in the ERR function to the actual error 
code, divide the ERR value by 2 and add 1 . 
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— ERR =======^^ 

For example, print err /z+1 

ALSO SEE 

ERL, ON-ERROR, RESUME, DIM, CLEAR 
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ERROR is used to intentionally cause the computer to 
ERROR. The type of error is specified by an error code in 
the ERROR statement. The ERROR statement is com- 
monly used in programs to execute error trapping 
routines, or to print a specified error message. 

TEST PROGRAM #1 (for a Microsoft Interpreter) 

10 INPUT N 

20 IF N > 32000 THEN ERROR 7 

99 END 




Command 
Statement 



When a value greater than 32000 is assigned to variable N, the condition of the IF-THEN 
statement in line 20 is met and the computer generates the ERROR message. 

OM ERROR IN 20 

(out of memory in line 20), even though the computer is not actually out of memory. 

Variables cannot be used as ERROR codes. Each code must be specified by an actual 
integer error code number. If the specified error code is not recognized by the computer's 
interpreter, then ERROR message "UNPRINTABLE ERROR" is printed by most com- 
puters. 

ERROR can also be entered as a command to test specific error codes. See your com- 
puter's manual for a listing of its error messages. 

TEST PROGRAM #2 

10 REM 'ERROR' TEST PROGRAM 

20 PRINT 'ERROR PASSED THE TEST IF ERROR MESSAGE 'OS' OR" 

30 PRINT " 'OUT OF STRING SPACE' IS PRINTED/' 

40 ERROR 14 

99 END 

SAMPLE RUN (typical) 

ERROR PASSED THE TEST IF ERROR MESSAGE 'OS'" 
OR 'OUT OFSTR1NG SPACE' IS PRINTED. 
?OS ERROR IN 40 

VARIATIONS IN USAGE 

None known. 

ALSO SEE 

ON-ERROR-GOTO, RESUME, ERR, ERL 
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EXAM(n) is used by some computers (e.g. the Digital 
Group MAXI-BASIC, the North Star BASIC, and the Pro- 
cessor Technology 8K BASIC) to read the contents of 
specified addresses in the computer's memory. 

For example, x=exam(200) assigns the value stored in 
memory address 200 to variable X. 

The EXAM function gives us the contents of that memory 

address as a decimal number between and 255 (the Function 

range of values that can be held in an 8 bit memory byte). 

EXAM can be used with the FILL statement to read what FILL has stored in memory. 

(Some computers use POKE or STUFF.) The highest number address that can be 

EXAMined depends of course on the computer's memory size. 

Check your computer's manual before executing this TEST PROGRAM to determine that 
memory addresses 18368 to 18380 are reserved as "free" memory. This avoids FILLing 
data into memory addresses reserved for other computer operations. If addresses 18368 
to 18380 are not reserved as free memory in your computer, select a group of 12 adjacent 
memory addresses and change lines 20 and 60 in the TEST PROGRAM accordingly. 

TEST PROGRAM 

10 REM 'EXAM* TEST PROGRAM 

20 FOR X=18368 TO 18380 

30 READ Y 

40 F1L.U X,Y 

50 NEXT X 

60 FOR X=18368 TO 18380 

70 Y = EXAM(X) 

80 PRINT CHRSfY); 

90 NEXT X 

100 DATA 84,69,83,84,128,67,79.77,80,76,69,84,69 

999 END 



SAMPLE RUN 

TEST COMPLETE 

VARIATIONS IN USAGE 

TvTono l/nr\u?n 

ALSO SEE 

FILL, POKE, PEEK, USR, SYSTEM 
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The EXP(n) function computes the natural logarithm's 
base value e (2.71828. . .) raised to the power of (n). 

This is just the opposite of what happens when the LOG 
function is used. 

For example, a=exp(3) is the same as A=2.71828 * 
2.71828 * 2,71828. 

The value (n) can be written as a number or a numeric 
variable. 




Function 



TEST PROGRAM 

10 REM 'EXP' TEST PROGRAM 

20 N-4.605 17 

30 E=EXP(N) 

40 PRINT "IF THE NATURAL EXPONENTIAL OF";N ;" IS" ;E 

50 PRINT "THEN THE EXP FUNCTION PASSED THE TEST." 

99 END 

SAMPLE RUN 

IF THE NATURAL EXPONENTIAL OF 4.60517 IS 100 
THEN THE EXP FUNCTION PASSED THE TEST. 

IF YOUR COMPUTER DOESN'T HA VE IT 

If your interpreter did not accept the EXP function, then substitute the following sub- 
routine for EXP: 

30000 GOTO 30999 

30240 REM * EXPONENTIAL SUBROUTINE * INPUT X, OUTPUT E 

30242 REM ALSO USES L AND A INTERNALLY 

30244 L=INT(l.4427*X)-M 

30246 IF L< 127 THEN 30258 

30248 IF X<=0 THEN 30254 

30250 PRINT X;"IS OUT OF RANGE" 

30252 STOP 

30254 E = 

30256 RETURN 

30258 E = .693147*L-X 

30260 A=1,32988E-3-l„41316E-4*E 

3 0262 A-((A*E-8.30136E-3)*E + 4.16574E-2)*E 

3 0264 E = ({{A-.16666 5)*E + .5)*E-1)*E+1 

30266 A=2 

30268 IF L> THEN 3 0276 

30270 A-.5 
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EXP 



30272 L-;=-t- 

30274 IF L.-0 THEN 30282 

30276 FOR X^T TO U 

30278 E=*A*E 

30280 NEXT X 

30282 RETURN 



To use this subroutine with the TEST PROGRAM, make the following program changes: 



35 X=N 

40 GOSUB 30244 

ALSO SEE 

LOG, LOGE, LOG10, CLOG 
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F. is used in the TRS-80 Level I and other variations of 
Palo Alto Tiny BASIC as an abbreviation for the FOR 
statement. 

For more information see FOR. 
TEST PROGRAM 

10 REM 'F. (FOR)' TEST PROGRAM 

20 F„ X=l TO 5 

30 PRINT X; 

40 NEXT X 

50 PRINT "*F.' PASSED THE TEST" 

99 END 




Statement 



SAMPLE RUN 

12 3 4 5 'F. 1 PASSED THE TEST 

VARIATIONS IN USAGE 

None known. 

ALSO SEE 

FOR, FOR-NEXT 



99 




Function 



FETCH(n) is used in the Digital Group Opus 1 and Opus 2 
BASIC to read the contents of addresses in the computer's 
memory. 

For example, x-fetch(3000) assigns the decimal value 
stored in memory address 3000 to the variable X. 

That value will be a number between and 255 (the range 
of values that can be held in an 8 bit memory byte). The 
highest number that can be FETCHed depends of course 
on the computer's memory size. 

FETCH can be used with the STUFF statement to check what STUFF has stored in 
memory. (Some computers use POKE or FILL instead). 

Check your computer's manual before executing this TEST PROGRAM to determine that 
memory addresses 18368 to 18377 are reserved as free memory. This avoids STUFFing 
data into memory used for special purposes. If addresses 18368 to 18377 are not reserved 
as free memory in your computer, then select a group of 10 free consecutive memory 
addresses and change lines 30 and 70 in the TEST PROGRAM accordingly. 

TEST PROGRAM 

10 REM 'FETCH' TEST PROGRAM 

20 Y-l 

30 FOR X=18368 TO 18377 

40 STUFF X,Y 

50 Y = Y-M 

60 NEXT X 

70 FOR X=M8368 TO 18377 

80 Y=FETCH(X) 

90 PRINT Y; 

7 00 NEXT X 

t 10 PRINT 

120 PRINT --FETCH' PASSED THE TEST IF #1 THRU #10 ARE PRINTED" 

999 END 

SAMPLE RUN 

1 23456789 10 

•FETCH' PASSED THE TEST IF #1 THRU #10 ARE PRINTED 

VARIATIONS IN USAGE 
None known. 

ALSO SEE 

STUFF, POKE, PEEK, FILL, USR, SYSTEM 
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FILL is used by a few interpreters (e.g. the NORTH 
STAR BASIC and the Digital Group MAXI-BASIC) to fill 
a specified byte in the computer's memory with an integer 
value between and 255 (the maximum 8 bit value). 

For example, fill 3000,15 fills memory address 3000 
with the decimal number 15. 

The EXAM function can be used with FILL to inspect 
what FILL has stored into memory. (Some computers use 
PEEK or FETCH instead). 




Statement 



Computers vary in the amount of available memory and 

memory addresses that can be FILLed without erasing memory dedicated to other pur- 
poses. Check your computer's manual before running this TEST PROGRAM to determine 
that memory addresses 18368 to 18380 are noncritical memory locations. 

TEST PROGRAM 

10 REM "FILL/ TEST PROGRAM 

20 FOR X=18368 TO 18380 

30 READ Y 

40 FILL. X,Y 

50 NEXT X 

60 FOR X^18368 TO 18380 

70 Y=EXAM(X) 

80 PRINT CHRS(Y); 

90 NEXT X 

100 DATA 84,69,83,84,128,67,79,77,80,76,69,84,69 

999 END 

SAMPLE RUN 

TEST COMPLETE 

VARIATIONS IN USAGE 

None known. 

ALSO SEE 

POKE, STUFF, EXAM, PEEK 
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Function 



The FIX function is used to remove all numbers to the 
right of the decimal point. Its operation is similar to the 
INT function except FIX does not round negative 
numbers down. 

Example: 10 print fix(3.6) 

20 PRINT FIX(-3.6) 

prints the numbers 3 and -3. While 

10 PRINT INT(3.6) 
20 PRINT lNT(-3.6) 

prints the numbers 3 and -4. 

FIX is capable of handling any number, large or small, within the limitations of the com- 
puter's interpreter. 

TEST PROGRAM 

10 REM 'FIX' TEST PROGRAM 

20 N^-T2.3456 

30 A=FIX(N) 

40 PRINT '-FIX PASSED THE TEST IF "jN^'IS CHANGED TO ";A 

99 END 

SAMPLE RUN 

FIX PASSED THE TEST IF -12.3456 IS C H ANGED TO -1 2 

IF YOUR COMPUTER DOESN'T HA VE IT 

If your interpreter does not have the FIX function capability, but has the ABS, INT and 
SGN functions, then line 30 in the TEST PROGRAM can be replaced with: 

30 A=SGN(N)*!NT(ABS(N)) 

VARIATIONS IN USAGE 
None known. 

ALSO SEE 

INT, ABS, SGN 



102 



The FN function is used with the DEF statement to speci- 
fy variables as "user defined". The FN function is not 
executed when preceded by DEF. For more information 
see DEFine. 

The FN function can be manipulated like any built-in 
function. 

For example, 

10 DEF FNA(X)=1/X 
20 PRINT FNA(N) 




Function 



The FN function in this example is named "A" (FNA), and is assigned the equation 1/X 
in line 10. FNA is used here to compute the reciprocal of any numeric variable. 

The numeric variable (N) following FNA is substituted for the "dummy variable" (X in 
this example) in the DEF statement each time FNA is executed. 

TEST PROGRAM 

10 REM 'FN' TEST PROGRAM 

20 DEF FNX(A) = (A-32)*5/9 

30 PRINT "ENTER A TEMPERATURE IN FAHRENHEIT"; 

40 INPUT F 

50 C=FNX(F) 

60 PRINT F;"DEGREES FAHRENHEIT =";C ;"DEG REES CELSIUS." 

99 END 



SAMPLE RUN (using 70) 



ENTER A TEMPERATURE IN FAHRENHEIT? 70 

70 DEGREES FAHRENHEIT — 21 .1 1 1 1 DEGREES CELSIUS. 



VARIATIONS IN USAGE 

None known. 



ALSO SEE 

DEF, FNEND 
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The FNEND statement is used in computers which have 
the capability of DEFining and reDEFining a function at 
different points throughout a program. It ENDs the func- 
tion's DEFining process. 

Each DEF statement which is spread out over more than 
one line must end with a FNEND statement, and the com- 
puter cannot branch out of or into these DEF statements 
before the FNEND statement is executed. 




Statement 



TEST PROGRAM 

10 REM 'FNEND' TEST PROGRAM 

20 PRINT "ENTER A VALUE FOR X THAT IS GREATER OR LESS THAN if 

30 INPUT X 

40 DEF FNA(X) 

50 FNA=X*2 

60 IF X < 10 THEN 80 

70 FNA=X/2 

80 FNEND 

90 PRINT "THE NEW VALUE FOR X lS-'jFNAfX) 

999 END 



SAMPLE RUN (using 6) 



ENTER A VALUE FOR X THAT IS GREATER OR LESS THAN 10? 6 
THE NEW VALUE FOR X IS 12 

VARIATIONS IN USAGE 
None known. 

ALSO SEE 

DEF, FN 
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Statement 



The FOR statement is part of a FOR-TO-NEXT statement 
and is used to assign numbers to numeric variables within 
the range specified by FOR-TO. 

The first number immediately following the FOR is incre- 
mented by 1 each time its corresponding NEXT state- 
ment is executed. When the number following TO is 
exceeded, program execution continues at the line follow- 
ing the corresponding NEXT statement. 

TEST PROGRAM 

10 REM 'FOR' TEST PROGRAM 

20 FOR X=1 TO 5 

30 PRINT X; 

40 NEXT X 

50 PRINT "THE 'FOR' STATEMENT PASSED THE TEST" 

99 END 

SAMPLE RUN 

12 3 4 5 THE 'FOR' STATEMENT PASSED THE TEST 

Some computers use the STEP statement to increment FOR-TO-NEXT by a value other 
than one, and to allow decrementing (changing numbers in descending order). 

For more information see sxj~?p 



VARIATIONS IN USAGE 

Some computers (e.g. DEC BASIC-PLUS-2), under specific conditions allow a FOR-TO 
with the NEXT only implied, not actually written. 

ALSO SEE 

NEXT, FOR-NEXT, STEP, F. 



105 



The FRE(string) function is used to report the number of 
bytes of total string space allocated but unused in the 
computer's memory. Any character (enclosed in quotes) 
or string variable can be used with the FRE function. The 
B$ in line 50 below is completely arbitrary. 

Most computers with FRE capability automatically 
reserve 50 bytes of string space when the computer is 
turned on. 




Function 



TEST PROGRAM 

10 REM 'FRE(STRING)' TEST PROGRAM 

20 PRINT "ENTER ANY COMBINATION OF LETTERS AND NUMBERS' 

30 INPUT AS 

40 PRINT "THE AMOUNT OP UNUSED STRING SPACE =*'•; 

50 PRINT FRE(BS) 

99 END 



SAMPLE RUN (Typical, using computer) 

ENTER ANY COMBINATION OF LETTERS AND NUMBERS? COMPUTER 
THE AMOUNT OF UNUSED STRING SPACE = 42 

Try various combinations of letters and numbers in the test program to demonstrate the 
action of the FRE function. 

Some computers use numbers or numeric variables in the FRE function to report the 
total amount of memory remaining (not just that part reserved for strings), similar to 
the MEM statement. 



VARIATIONS IN USAGE 
None known. 

ALSO SEE 
MEM, CLEAR, $ 
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FREE(0) is used by some computers (e.g. the NORTH 
STAR BASIC, Processor Technology Extended BASIC, 
and Digital Group MAXI-BASIC) to report the total 
amount of remaining memory (i.e. similar to the MEM 
statement). 

TEST PROGRAM 

10 REM *FREE{0)' TEST PROGRAM 

20 PRINT FREE(0);"BYTES OF MEMORY ARE REMAINING 

99 END 




Function 



SAMPLE RUN (typical) 

13S04 BYTES OF MEMORY ARE REMAINING 

The amount of memory remaining will of course depend on your computer. 

VARIATIONS IN USAGE 
None known. 

ALSO SEE 
MEM, PRE 
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G. is used in the TRS-80 Level I and other variations of 
Palo Alto Tiny BASIC as an abbreviation for the GOTO 
statement. 

For more information see GOTO, 
TEST PROGRAM 

10 REM 'G.' TEST PROGRAM 

20 PRINT "THE G. STATEMENT"; 

30 G. 60 

40 PRINT "FAILED" 

50 STOP 

60 PRINT "HAS PASSED THE TEST." 

99 END 




Statement 



SAMPLE RUN 

THE G. STATEMENT HAS PASSED THE TEST. 

VARIATIONS IN USAGE 
None known. 

ALSO SEE 
GOTO, GOT 
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GE is used in some computers (e.g. the TI 990) as an 
abbreviation for the "greater than or equal to" sign ( > =). 

For more information see > =. 



TEST PROGRAM 



10 REM 'GE' (GREATER THAN OR EQUAL. TO) TEST PROGRAM 

20 IF 20 GE 10 THEN 50 

30 PRINT "THE GE OPERATOR FAILED THE TEST IN LINE 20" 

40 GOTO 99 

50 IF 20 GE 20 THEN 80 

60 PRINT "THE GE OPERATOR FAILED THE TEST IN LINE 50" 

70 GOTO 99 

80 PRINT "THE GE OPERATOR PASSED THE TEST" 

99 END 




Operator 



SAMPLE RUN 

THE GE OPERATOR PASSED THE TEST 

VARIATIONS IN USAGE 

None known. 

ALSO SEE 
>=, = > , IF-THEN 
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GO is used as part of GO TO and GO SUB statements. 
The BASIC language does not recognize the word GO by 
itself. Most computers don't care if there is a space after 
the GO, converting automatically to GOTO or GOSUB. 
Others (e.g. TRS-80 Level I) do not allow the space. 

This program uses GO in the GO TO statement. For more 
information see GOTO. 
TEST PROGRAM 

10 REM 'GO' TEST PROGRAM 

20 PRINT "THE GO STATEMENT "; 

30 GO TO 60 

40 PRINT "FAILED THE TEST" 

50 GOTO 99 

60 PRINT "PASSED THE TEST/' 

99 END 




Statement 



SAMPLE RUN 

THE GO STATEMENT PASSED THE TEST. 

This program uses GO in the GO SUB statement. For more information see GOSUB. 

TEST PROGRAM 

10 REM 'GO' (USED WITH SUB) TEST PROGRAM 

20 GO SUB 100 

30 PRINT "PASSED THE TEST WHEN USED WITH SUB/* 

40 GO TO 999 

100 REM SUBROUTINE 

1 10 PRINT 'THE GO STATEMENT "j 

1 20 RETURN 

999 END 

SAMPLE RUN 

THE GO STATEMENT PASSED THE TEST WHEN USED WITH SUB. 

w t A tr»T k nnT/\TkTn TTW T TTft A f~\ T? 

V AlVi/V JL tyjlS O UN UOAUJi 

None known. 

ALSO SEE 

GOTO, GOT, G., GOSUB, GOS, 
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GOS. is used in the TRS-80 Level I and other variations of 
Palo Alto Tiny BASIC as an abbreviation for the GOSUB 
statement. 

For more information see GOSUB. 
TEST PROGRAM 

10 REM 'GOS.' TEST PROGRAM 

20 GOS. 100 

30 PRINT "PASSED THE TEST AT LINE 20" 

40 GOTO 999 

100 REM SUBROUTINE 

1 10 PRINT "THE GOS. STATEMENT "; 

120 RETURN 

999 END 




Statement 



SAMPLE RUN 

THE GOS. STATEMENT PASSED THE TEST AT LINE 20 

VARIATIONS IN USAGE 
None known. 

ALSO SEE 

GOSUB, ON-GOSUB, IF-GOSUB, RETURN 
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GOSUB is used to branch out of a program's "main- 
stream" to a Subroutine, The GOSUB statement must be 
followed by a line number to indicate the first line of the 
subroutine to be executed. 

A RETURN statement must be used at the end of a sub- 
routine execution to return control from the subroutine 
to the main program. 

TEST PROGRAM 

10 REM 'GOSUB' TEST PROGRAM 

20 GOSUB 1 00 

30 PRINT "PASSED THE TEST AT LINE 20" 

40 GOTO 999 

100 REM SUBROUTINE 

110 PRINT "THE GOSUB STATEMENT "; 

120 RETURN 

999 END 




Statement 



SAMPLE RUN 

THE GOSUB STATEMENT PASSED THE TEST AT LINE 20 

VARIATIONS IN USAGE 
None known. 

ALSO SEE 

RETURN, ON-GOSUB, IF-GOSUB, GOS. 
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GOT is used in the PDP-8E as an abbreviation for the 
GOTO statement. 

For more details see GOTO. 
TEST PROGRAM 

10 REM 'GOT' TEST PROGRAM 

20 PRINT "THE GOT STATEMENT "; 

30 GOT 60 

40 PRINT "FAIt-ED" 

50 GOTO 99 

60 PRINT "HAS PASSED THE TEST/' 

99 END 




Statement 



SAMPLE RUN 

THE GOT STATEMENT HAS PASSED THE TEST. 

VARIATIONS IN USAGE 

None known. 

ALSO SEE 
GOTO, G. 
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The GOTO statement is used to "jump" program execu- 
tion to a specified line number. Many computers also 
accept this statement as two words; GO TO. 

TEST PROGRAM 

10 REM 'GOTO' STATEMENT TEST PROGRAM 

20 PRINT "THE GOTO STATEMENT "; 

30 GOTO 60 

40 PRINT • , FAIL-ED" 

5 STOP 

60 PRINT "HAS PASSED THE TEST." 

99 END 




Statement 



SAMPLE RUN 

THE GOTO STATEMENT HAS PASSED THE TEST. 

VARIATIONS IN USAGE 

GOTO is often used in conjunction with other expressions. 

ALSO SEE 

GOT, G., IF-GOTO, ON-GOTO, GOTO-OF, etc. 
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GOTO-OF is used by some computers (e.g. the Hewlett 
Packard 3000 and the Tektronix 4051) as a multiple 
branching tool which incorporates a number of IF-THEN 
tests into a single statement. 

For example, goto x of 100,200,300 instructs the 
computer to branch to lines 100, 200 or 300 if the integer 
value of X is 1 , 2 or 3 respectively . If INT X is less than 1 
or more than 3, the tests in this example all fail and 
execution defaults to the next program line. The INT 
value of X cannot exceed the number of possible branches 
in the statement. 
TEST PROGRAM 

10 REM 'GOTO-OF' TEST PROGRAM 

20 X=2 

30 GOTO X OF 40,60 

40 PRINT "'GOTO-OF' FAILED THE TEST" 

50 GOTO 99 

60 PRINT "'GOTO-OF' PASSED THE TEST" 

99 END 




Statement 



SAMPLE RUN 

•GOTO-OF' PASSED THE TEST 

VARIATIONS IN USAGE 

None known. 

ALSO SEE 

GO-TO-OF, ON-GOTO, ON-GOT, ON-GOSUB, IF-THEN and INT 
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GOTO-OF is used in a few computers (e.g. the VAR1AN 
620 BASIC) as a multiple branching scheme which incor- 
porates a number of IF-THEN tests into a single state- 
ment. 

For example, go to x or 100,200,300 instructs the 
computer to branch to lines 100, 200, or 300 if the value 
of X is 1, 2, or 3 respectively. If INT of X is less than 
1 or more than 3 the tests in this GOTO-OF example all 
fail and execution defaults to the next program line. The 
value of X cannot exceed the number of possible branch- 
es in the statement. 




Statement 



Most computers accept both GO TO (two words) or GOTO (one word) while a few (e.g. 
VARIAN 620 BASIC) accept only the two words GO TO. 

TEST PROGRAM 

10 REM 'GO-TO-OF' TEST PROGRAM 

20 X=2 

30 GO TO X OF 40,60 

40 PRINT " 'GO-TO-OF' FAIL-ED THE TEST" 

50 GOTO 99 

60 PRINT "'GO-TO-OF' PASSED THE TEST" 

99 END 

SAMPLE RUN 

'GO-TO-OF' PASSED THE TEST 

VARIATIONS IN USAGE 

See ON-GOTO for various multiple branching schemes. 

ALSO SEE 

GOTO-OF, ON-GOTO, ON-GOT, GOSUB-OF, ON-GOSUB, IF-THEN 
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GR is used in the APPLE II BASIC as both a command 
and a program statement to change the computer's opera- 
tion from the TEXT mode to the GRaphics mode. GR 
must be executed before using the special graphics state- 
ments PLOT, HLIN-AT and VLIN-AT. 

GR can also be used to clear the screen before starting a 
new graphics display. Each time GR is executed, the 
computer erases the entire screen, 

TEST PROGRAM 

10 REM 'GR' TEST PROGRAM 

20 GR 

30 COLOR = 6 

40 HLIN 0,39 AT 20 

50 END 

SAMPLE RUN 

If the computer accepted the GR statement, a blue horizontal line should appear across 
the screen. 



Command 
Statement 



VARIATIONS IN USAGE 

None known. 

ALSO SEE 

TEXT, COLOR, HLIN-AT, VLIN-AT, PLOT 
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GT is used in some computers (e.g. the TI 990) as an 
alternate word for the "greater-than" sign ( > ). 

For more information see > . 



TEST PROGRAM 

10 REM 'GT {GREATER THAN} 1 TEST PROGRAM 

20 IF 10 GT 5 THEN 50 

30 PRINT "THE GT OPERATOR FAILED THE TEST" 

40 GOTO 99 

50 PRINT "THE GT OPERATOR PASSED THE TEST" 

99 END 




Operator 



SAMPLE RUN 

THE GT OPERATOR PASSED THE TEST 

VARIATIONS IN USAGE 
None known. 

ALSO SEE 
> , IF-THEN 
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HLIN-AT is used in the APPLE II BASIC as a special 
feature to display a Horizontal LINe AT a specified row 
on the screen. 

The horizontal line length is determined by two numbers 
following the HLIN statement. These numbers indicate 
the bounds between which the line will extend. The 
line may extend any length between columns to 39. 

The number following AT represents the row number 
which the line must occupy. This number may range 
from to 39. 




Statement 



For example, hlin 10,30 at 20 tells the computer to draw a horizontal line from 
column 10 to column 30 AT row 20. 

The GRaphics statement must be executed before the computer can accept the HLIN-AT 
statement (see GR). The line's color is determined by the COLOR statement (see 
COLOR), 

TEST PROGRAM 

10 REM 'HLIN-AT' TEST PROGRAM 

20 GR 

30 Y=0 

40 FOR X=0 TO 39 

50 COLOR - Y 

60 HLIN 0,39 AT X 

70 Y=Y+1 

80 IF Y < 16 THEN 100 

90 Y=:0 

100 NEXT X 

999 END 



SAMPLE RUN 

If the computer accepted the HLIN-AT statement, the screen should be fdled with 39 
horizontal lines of various colors. 



VARIATIONS IN USAGE 

None known. 

ALSO SEE 

GR, COLOR, PLOT, VLIN-AT, TEXT 
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I. is used in the TRS-80 Level I and other variations of 
Palo Alto Tiny BASIC as an abbreviation for the INT 
function. 

For more information see INT. 
TEST PROGRAM 

10 REM 'L (INT)' TEST PROGRAM 

20 X^2.864 

30 PRINT "THE INTEGER VALUE OF";X; 

40 X=L{X} 

50 PRINT "IS";X 

99 END 




Function 
Statement 



SAMPLE RUN (using 10) 

THE INTEGER VALUE OF 2.864 IS 2 

VARIATIONS IN USAGE 

I. can also be used in the TRS-80 Level I BASIC as an abbreviation for the INPUT state- 
ment when I. is not followed by a value enclosed in parenthesis. 

TEST PROGRAM 

10 REM *l. (INPUT}' TEST PROGRAM 

20 PRINT "ASSIGN A VALUE TO THE VARIABLE X"; 

30 I.X 

40 PRINT "THE VALUE OF X IS";X 

99 END 



SAMPLE RUN (using 10) 



ASSIGN A VALUE TO THE VARIABLE X? 1 f 
THE VALUE OFX IS 10 



ALSO SEE 

INPUT, INPUTL, IN., INP 
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The IF statement is part of the conditional branching 
statements IF-THEN, IF GOTO, IF GOSUB, IF-LET, etc., 
and is used to indicate the variable to be tested by one of 
the relational operators (see =,<,>, < =, >=, 

<> )■ 

For example, if x-3 then 100 the computer branches 
or "jumps"to line 100 IF X equals 3. If the condition is 
not met (i.e. X^3), the test "falls through" and program 
execution continues on the next line. Statement 

These conditional IF-THEN tests must be used last in multiple statement lines because 
the computer either branches to the indicated line number (if the test is true), or falls 
through to the next numbered line (if the test is false). 

For example, 30 if x-3 then i00:print "x=3" The PRINT statement can never be 
executed. 



TEST PROGRAM 

10 REM 'IF' TEST PROGRAM 

20 X=10 

30 IF X-10 THEN 60 

40 PRINT "•IF- FAILED THE TEST" 

50 GOTO 99 

60 PRINT "'IF' PASSED THE TEST" 

99 END 



SAMPLE RUN 

'IF' PASSED THE TEST 

To further check the computer's IF capability, see the TEST PROGRAMS under 
IF-GOTO, IF-GOSUB and IF-LET* 



VARIATIONS IN USAGE 

None known, 

ALSO SEE 

IF-THEN, IF-GOTO, IF-GOSUB, IF-LET, IF-G., IF-GOS., IF-GOT, IF-T., IF-THE 
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IF-G. is used in the TRS-80 Level I and other variations of 
Palo Alto Tiny BASIC as an abbreviation for the IF- 
GOTO statement. 

For more information see IF-GOTO. 
TEST PROGRAM 

10 REM 'IF-CtlF-GOTOj' TEST PROGRAM 

20 X=30 

30 IF X^30 G.60 

40 PRINT "THE I FC STATEMENT FAILED THE TEST" 

50 GOTO 99 

6 PRINT "THE 1 F-G . STATEMENT PASSED THE TEST" 

99 END 




Statement 



SAMPLE RUN 

THE IF-G. STATEMENT PASSED THE TEST 

VARIATIONS IN USAGE 

None known . 

ALSO SEE 

IF-GOTO, IF-GOT, IF-THEN, GOTO 
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IF-GOS. is used in the TRS-80 Level I and other variations 
of Palo Alto Tiny BASIC as an abbreviation for the IF- 
GOSUB statement. 



For more information see IF-GOSUB. 



TEST PROGRAM 



10 REM 'IF-GOS.* TEST PROGRAM 

20 X^3 

30 IF X=3 GOS. 100 

40 PRINT "PASSED THE TEST AT UINE 30-" 

50 GOTO 999 

100 REM SUBROUTINE 

1 10 PRINT "THE IF-GOS. STATEMENT "; 

1 20 RETURN 

999 END 

SAMPLE RUN 

THE IF-GOS. STATEMENT PASSED THE TEST AT LINE 30. 

VARIATIONS IN USAGE 

None known. 

ALSO SEE 

IF-GOSUB, GOSUB, RETURN, IF-THEN, ELSE 




Statement 
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The IF-GOSUB statement is a conditional subroutine 
branching statement using one of the relational operators 
(see =,<,>,<==,>=,<>) 

When the condition of the lF-GOSUb statement is met, 
the computer executes the GOSUB statement. 



For example, if x-3 gosub i 00 tells the computer to 
branch or "jump" to the subroutine starting at line 100 
if X equals 3. If the condition is not met (i.e. X£3), the 
test "falls through" and program execution continues on the next line 




Statement 



PEST PROGRAM 



10 REM 'IF-GOSUB' TEST PROGRAM 

20 X=3 

30 IF X=3 GOSUB 100 

40 PRINT "PASSED THE TEST AT UINE 30" 

50 GOTO 999 

100 REM SUBROUTINE 

110 PRINT "THE IF-GOSUB STATEMENT " ; 

120 RETURN 

999 END 

SAMPLE RUN 

THE IF-GOSUB STATEMENT PASSED THE TEST AT U1NE 30 

VARIATIONS IN USAGE 
None known. 

ALSO SEE 

GOSUB, IF-GOS., RETURN, IF-THEN, ELSE 
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IF-GOT is used in the PDF-8E as an abbreviation for the 
IF-GOTO statement. 

For more details see IF-GOTO, 
TEST PROGRAM 

10 REM 'IF-GOT' TEST PROGRAM 

20 X=10 

30 IF X=10 GOT 60 

40 PRINT "IF-GOT 1 FAILED THE TEST" 

50 GOTO 99 

60 PRINT "'IF-GOT' PASSED THE TEST" 

99 END 




Statement 



SAMPLE RUN 

'IF-GOT' PASSED THE TEST 

VARIATIONS IN USAGE 
None known. 

ALSO SEE 
IF-GOTO, IF-G. 
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IF-GOTO is a conditional branching statement using one 
of the relational operators (see =,<,>,<=,>-,<>)■ 

When the condition of the IF-GOTO statement is met, the 
computer executes the branching statemeni GOTO. 

For example, if x=3 goto i 00 tells the computer to 
branch or "jump" to line 100 if X equals 3, If the condi- 
tion is not met (i.e. Xf3), the test "falls through" and the 
program execution continues on the next line. 




Statement 



TEST PROGRAM 

10 REM ■IF-GOTO' TEST PROGRAM 

20 X=30 

30 IF X=30 GOTO 60 

40 PRINT -'THE IF-GOTO STATEMENT FAILED THE TEST" 

50 GOTO 99 

60 PRINT "THE IF-GOTO STATEMENT PASSED THE TEST" 

99 END 

SAMPLE RUN 

THE IF-GOTO STATEMENT PASSED THE TEST 

VARIATIONS IN USAGE 

Some interpreters allow the statement THEN to be used in place of GOTO. See IF-THEN. 

ALSO SEE 

GOTO, GOSUB, ELSE, IF-THEN 
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The IF-LET statement is a conditional LET statement using 
one of the relational operators (see =,<,>,<=,>=,<>). 

When the condition of the IF-LET statement is met, the 
computer assigns a value to the variable following LET. 

TEST PROGRAM 



10 REM 'IF-LET' TEST PROGRAM 

20 X=30 

30 IF X>20 LET X=l 

40 PRINT "X =";X 

5 PRINT "■IF-LET' PASSED THE TEST IF THE VALUE OF X iS 10" 

99 END 




Statement 



SAMPLE RUN 



X = 10 

'IF-LET' PASSED THE TEST IF THE VALUE OF X IS t $ 



VARIATIONS IN USAGE 

Computers are not uniform in their use of the LET statement. Many allow LET to be 
omitted while others allow the THEN statement in place of LET. 



ALSO SEE 

IF-THEN, LET 



127 




IF-T. is used in the TRS-80 Level I as an abbreviation for 
the IF-THEN statement. 

For more information see IF-THEN. 
TEST PROGRAM 

10 REM 'IF-T.' TEST PROGRAM 

20 x=t0 Statement 

30 IF X=10 T.60 

40 PRINT '"IF-T/ FAILED THE TEST" 

5 GOTO 9 9 j' 

60 PRINT '"IF-T/ PASSED THE TEST" 

99 END 

SAMPLE RUN 

.,p. T . PASSED THE TEST 

VARIATIONS IN USAGE 

None known. 

ALSO SEE 

IF-THEN, IF-THE 
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IF-THE is used in the PDP-8E as an abbreviation for the 
IF-THEN statement. 

For more information see IF-THEN. 
TEST PROGRAM 

10 REM IF-THE' TEST PROGRAM 

20x=10 Statement 

30 IF X=M0 THE 60 

40 PRINT "'IF-THE' FAILED THE TEST" 

50 GOTO 99 

60 PRINT '"IF-THE* PASSED THE TEST" 

99 END 

SAMPLE RUN 

'IF-THE' PASSED THE TEST 

VARIATIONS IN USAGE 

None known. 

ALSO SEE 

IF-THEN, IF-T. 
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The IF-THEN statement is a conditional branching 
statement using one of the relational operators 
(see=,< ,>,<=,>=,<> ). 

When the condition of the IF-THEN statement is met, the 
computer executes the branching statement number fol- 
lowing THEN. For example, if x=3 then i 00 tells the 
computer to branch or "jump" to line 100 if X equals 3. 
If the condition is not met (i.e. X^3), the test "falls 
through" and program execution continues on the next 
line. 




Statement 



TEST PROGRAM 



10 REM 'IF-THEN' TEST PROGRAM 

20 X=30 

30 IF X=30 THEN 60 

40 PRINT "THE IF-THEN STATEMENT FAILED THE TEST" 

50 GOTO 99 

60 PRINT "THE IF-THEN STATEMENT PASSED THE TEST IN LINE 30" 

99 END 



SAMPLE RUN 

THE IF-THEN STATEMENT PASSED THE TEST IN LINE 30 

Some computers allow math operations to be performed when the IF-THEN statement is 
satisfied. For example, if a=3 then x-2*(a + 6 J/3 calculates for the value of X if the 
variable A is equal to 3. If not, the test fails and execution proceeds to the next line. 

To test this feature in your computer, add the following program lines: 

70 IF X=30 THEN X^X+90 

80 PRINT "X=";X 

90 PRINT'MF-THEN PASSED THE TEST IN LINE 70 IF X=120" 

SAMPLE RUN 

THE IF-THEN STATEMENT PASSED THE TEST IN LINE 30 

X=120 

IF-THEN PASSED THE TEST IN LINE 70 IF X=120 

Some interpreters allow any of the operating statements to be performed when the 
IF-THEN condition is met. For example, if x=3 then end will stop program execution 
when the value of X equals 3. 
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IF-THEN ========^^ 

Add the following line to the test program to check this capability: 

100 IF X= 120 THEN PRINT "IF-THEN PASSED THE TEST IN LINE 100" 

SAMPLE RUN 

THE IF-THEN STATEMENT PASSED THE TEST IN LINE 30 

X=M20 

IF-THEN PASSED THE TEST IN LINE 70 IF X- 1 20 

IF-THEN PASSED THE TEST IN LINE 100 

Computers are not uniform in their use of the THEN statement. Many allow THEN to be 
omitted when IF is followed directly by a math operator, operating statement, or branch- 
ing statement. 

TEST PROGRAM 

This program tests for three variations which imply (but do not use) THEN. 

10 REM TEST PRDGRAM WITH IMPLIED 'THEN* IN LINES 30, 60 AND 999 

20 X=30 

30 IF X=30 GOTO 60 

40 PRINT "LINE 30 FAILED THE TEST" 

50 GOTO 999 

60 IF X=30 GOSUB 100 

70 GOTO 999 

100 REM SUBROUTINE 

110 PRINT "LINES 30 AND 60 PASSED THE TEST, DOES LINE 999?" 

120 RETURN 

999 IF X=30 END 

SAMPLE RUN 

LINES 30 AND 60 PASSED THE TEST, DOES LINE 999? 

Great caution must be used with interpreters which allow use of multiple statement lines. 
The "falling thru" of an IF-THEN test is to the next line, not the next statement on the 
same line. For this reason, IF-THEN tests are usually not followed by other statements on 
the same line. 

For example: if x=s then x=x+Y:print x. The PRINT statement is not executed if 
the value of X does not equal 5, 

ALSO SEE 

ELSE, GOTO, GOSUB, STOP, END, PRINT and other IF . . . statement BASIC words 
which allow use of THEN by implication. 
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IN. is used in the TRS-80 Level I and other variations of 
Palo Alto Tiny BASIC as an abbreviation for the state- 
ment INPUT. 

For more information see INPUT. 
TEST PROGRAM 

10 REM in: test program 

20 PRINT "ASSIGN A VALUE TO THE VARIABLE X"; 

30 IN. X 

40 PRINT "THE VALUE OF X IS";X 

99 END 




\^^^^SeSSSSSS9VVS I^S 1 iv^^ 



Statement 



SAMPLE RUN (using 10) 

ASSIGN A VALUE TO THE VARIABLE X? If 
THE VALUE OP X IS 10 

VARIATIONS IN USAGE 
None known. 

ALSO SEE 

INPUT, INPUTL, INKEY$, INP, I. 
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The INKEYS function is used in the TRS-80 Level II 

BASIC to read a character from the keyboard each time 

INKEYS is executed. Unlike the INPUT statement, 

INKEYS does not halt execution waiting for the ENTER 

key to be pressed. The computer just keeps "circling" 

until it receives a message from the keyboard. Until a key 

on the keyboard is pressed, INKEYS simply reads an 

"empty" string (ASCII code of 0), 

Since INKEYS doesn't wait for you to enter a character 

from the keyboard and "ENTER", it usually is placed in Function 

a program loop to repeatedly scan the keyboard looking for a pressed key. 

For example: 

10 IF INKEY$="X" GOTO 100 

20 GOTO 10 

100 PRINT "YOU HIT 'X' DIDN'T YOU!" 

The INKEYS function repeatedly looks for the letter X at the keyboard to meet the 
condition of the IF-THEN statement. When the letter X is entered, the condition of the 
IF-THEN statement is met and the computer branches to line 100. 

TEST PROGRAM 

10 REM 'INKEY$' TEST PROGRAM 

20 CUS 

30 PRINT "PRESS ANY KEY ON THE KEYBOARD" 

40 A$ = 1NKEYS 

50 IF A$= M,, GOTO 40 

60 PRINT "YOU HAVE JUST PRESSED THE ";A$;" KEY" 

70 PRINT: PRINT "PRESS THE ";A$;" KEY AGAIN TO START OVER" 

80 IF INKEYS^AS GOTO 20 

90 GOTO 80 

99 END 

SAMPLE RUN (using R) 

PRESS ANY KEY ON THE KEYBOARD 
YOU HAVE JUST PRESSED THE R KEY 

PRESS THE R KEY AGAIN TO START OVER 

VARIATIONS IN USAGE 

None known, 

ALSO SEE 
INPUT, IF-THEN 
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INP stands for "Input from a port". 

The INP statement is used to read the decimal value of a 
byte of information at. a specified computer port. The 
byte value can be any positive integer from to 255. 

For example, print inp(x) prints the decimal value of 
the byte at port X. 




INP is a useful tool to monitor ports for a specific condi- Statement 

tion, such as an input request from a remote peripheral 

device. Other applications might include reading temperatures from remote sensors on a 
solar hot water heating system, etc. 

TEST PROGRAM 

10 REM MNP 1 TEST PROGRAM 

20 FOR X=0 TO 255 

30 PRINT "THE DECIMAL VALUE OF THE BYTE AT PORT #";X;"IS ,, ;IN P(X) 

40 NEXT X 

99 END 

SAMPLE RUN (typical) 



THE DECIMAL. VALUE OF THE BYTE AT PORT# IS 255 



THE DECIMAL- VALUE OF THE BYTE AT PORT# 255 IS 1 27 



INP is also used in versions of the PDP-8 as an abbreviation for the INPUT statement. 
For more information see INPUT. 
TEST PROGRAM 

10 REM MNP (INPUT)' TEST PROGRAM 

20 PRINT "ASSIGN A VALUE TO THE VARIABLE X" 

30 INP X 

40 PRINT "THE VALUE OF X IS";X 

99 END 



SAMPLE RUN (using 10) 

ASSIGN A VALUE TO THE VARIABLE X 

? 10 

THE VALUE OF X IS 10 
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INP = 

VARIATIONS IN USAGE 

None other known. 

ALSO SEE 

OUT, PEEK, POKE, INPUT, I., IN. 
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The INPUT statement allows the user to assign data to 
variables from the keyboard. When the computer executes 
an INPUT statement, it prints a question mark indicating 
it is waiting for you to assign a value to a variable. It will 
continue to wait until the ENTER (or RETURN) key is 
pressed. 



TEST PROGRAM 

10 REM 'INPUT' STATEMENT TEST PROGRAM 

20 PRINT "ASSIGN A VALUE TO THE VARIABLE X" 

30 INPUT X 

40 PRINT "THE VALUE OF X IS" ;X 

99 END 




Statement 



SAMPLE RUN ( using 1{ 



ASSIGN A VALUE TO THE VARIABLE X 

? 10 

THE VALUE OF X IS 10 



VARIATIONS IN USAGE 

An increasingly common variation found in microcomputer interpreters allows INPUT to 
serve in both PRINT and INPUT capacities (thus conserving space). 



TEST PROGRAM 

10 REM 'INPUT/PRINT* STATEMENT TEST PROGRAM 
20 INPUT "ASSIGN A VALUE TO THE VARIABLE 'X'" 
30 PRINT "THE VALUE OF X IS";X 
99 END 



SAMPLE RUN (using U 



ASSIGN A VALUE TO THE VARIABLE 'X' 

? 10 

THE VALUE OFX IS 10 

Note that no PRINT statement preceded the INPUT statement. Both functions were 
combined in line 20. 

ALSO SEE 

INPUTL, INKEY$, INP, IN., I. 
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The INPUTL statement is used by a few computers (e.g. 
the Digital Group Maxi-BASIC) in a manner similar to the 
INPUT statement, but INPUTL stops the carriage return 
after the INPUT data has been assigned to a variable. 

For more information see INPUT. 



TEST PROGRAM 




10 REM 'INPUTL' TEST PROGRAM 

20 PRINT "ASSIGN A VAUUE TO THE VARIABLE X" 

30 INPUT X 

40 PRINT "VARIABLE X=";X 

5 PRINT "INPUTL. PASSED THE TEST IF THE WORDS VARIABLE X =";X 

60 PRINT "ARE PRINTED ON THE SAME LINE AS THE ? SIGN" 

99 END 



Statement 



SAMPLE RUN (using 10) 



ASSIGN A VALUE TO THE VARIABLE X 

? 10 VARIABLE X = 10 

INPUTL PASSED THE TEST IF THE WORDS VARIABLE = 10 

ARE PRINTED ON THE SAME LINE AS THE ? SIGN 

VARIATIONS IN USAGE 

None known. 

ALSO SEE 
INPUT, INP, IN. I. 
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The INTeger function is used to round numbers off to 
their integer (whole number) value. In BASIC numbers are 
always rounded down. The whole number remains the 
same regardless of the value of the numbers removed from 

number is integered, the resultant number is rounded off 
to the next smaller whole number. For example, INT 
(—4.65) returns a value of 5. 

There are limits to the size of the number that some com- Function 

puters will process with the INT function. Some microcomputers will not accept a num- 
ber smaller than -32767 or larger than +32767 within the parenthesis. 

TEST PROGRAM 

t0 REM 'INT* TEST PROGRAM 

20 READ X 

30 PRINT "THE INTEGER VALUE OF"; X; 

40 X = INT(X) 

50 PRINT "IS"; X 

60 IF X=999 THEN 999 

70 GOTO 20 

80 DATA 3, 33, 2. 864, ,35,-3. 15, 32766. 853,-32766. 853, 999. 99 

999 END 



SAMPLE RUN 

THE INTEGER VALUE OF 3,33 IS 3 

THE INTEGER VALUE OF 2.864 IS 2 

THE INTEGER VALUE OF .35 IS 

THE INTEGER VALUE OF -3.15 IS -4 

THE INTEGER VALUE OF 32766.853 IS 32766 

THE INTEGER VALUE OF -32766.853 IS -32767 

THE INTEGER VALUE OF 999.99 IS 999 

VARIATIONS IN USAGE 

None, other than the limitation indicated. 

ALSO SEE 
CINT, % 
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L is used in the TRS-80 Level I and other variations of 
Palo Alto Tiny BASIC as an abbreviation of the LIST 
command. 

For more information see LIST. 



TEST PROGRAM 

10 REM 'L. (LIST) 1 TEST PROGRAM Command 

20 REM THIS COMMAND 

30 REM W1L.U DISPLAY EACH LINE 

40 REM AS HELD BY THE COMPUTER 

50 PRINT ■"L/ TEST COMPLETE" 

99 END 



SAMPLE RUN 

After entering the L. command, the computer should LIST the entire program. With 
longer programs, it will list only enough of it to fill the screen; to see more, press the t 
key. 

VARIATIONS IN USAGE 

None known. 

ALSO SEE 

LIST, LI, LIS 
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LE is used in some computers (e.g. the TI 990) as an 
alternate word for the "less than or equal to" sign ( < =). 

For more information see < =. 



TEST PROGRAM 



10 REM 'LE (LESS THAN OR EQUAL TO} TEST PROGRAM 

20 IF 10 LE 20 THEN 50 

30 PRINT "THE LE OPERATOR FAILED THE TEST IN LINE 20' 

40 GOTO 99 

50 IF 20 LE 20 THEN 80 

60 PRINT "THE LE OPERATOR FAILED THE TEST IN LINE 50' 

70 GOTO 99 

80 PRINT "THE LE OPERATOR PASSED THE TEST" 

99 END 




Operator 



SAMPLE RUN 

THE LE OPERATOR PASSED THE TEST 

VARIATIONS IN USAGE 
None known. 

ALSO SEE 
< =, = < , IF-THEN 
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The LEFT(string,n) function is used in some computers 
(e.g. those using MAX BASIC) to isolate a specific number 
(n) of string characters, starting from the left-most charac- 
ter in the string. 

For example, print left("running" ( 3) prints the 
letters RUN, which are the left 3 characters in RUNNING, 
which is a string. 

For more information see LEFTS. 



TEST PROGRAM 

10 REM 'LEFT' TEST PROGRAM 

20 A$="TESTING" 

30 B$=UEFT(A$,4) 

40 PRINT "THE 'LEFT' FUNCTION PASSEO THE ";B$ 

99 END 

SAMPLE RUN 

THE 'LEFT' FUNCTION PASSED THE TEST 

VARIATIONS IN USAGE 

None known. 

ALSO SEE 

LEFTS 




Function 
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The LEFT$(string,n) function is used to isolate a specific 
number (n) of string characters starting from the left -most 
character in the string. 

For example, print left^C'RUNNIng"^) prints the 
letters RUN, which are the left 3 characters in the string 
RUNNING. 

The string must be enclosed in quotes or listed as a string 
variable. The number of characters (n) can be expressed as 
a variable, number or arithmetic operation. A comma 
must separate the string from the number. 




Function 



If the value of (n) is a decimal, the computer automatically finds its integer value. 
TEST PROGRAM 

10 REM 'LEFTS' TEST PROGRAM 

20 AS="TESTING" 

30 B$ = L.EFTS(A$,4) 

40 PRINT L.EFT$("THEATER",3){" 'LEFTS' FUNCTION PASSED THE " ;B$ 

99 END 

SAMPLE RUN 

THE 'LEFTS' FUNCTION PASSED THE TEST 

VARIATIONS IN USAGE 
None known. 

ALSO SEE 

PRINT, RIGHTS, MID$, CHR$, SPACES, STRS, STRINGS, INKEYS 
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The LEN function is used to measure the LENgth of 
strings by counting the number of characters enclosed in 
quotes or assigned to string variables. 

For example, 10 print len("test") should print 4, 
the number of letters in the word "TEST", 



TEST PROGRAM 




10 REM 'LEN' TEST PROGRAM 

20 PRINT "TYPE ANY COMBINATION OF LETTERS AND NUMBERS" 

30 INPUT AS 

40 PRINT "YOU ENTERED ";AS" WHICH CONTAINS"; 

50 PRINT LEN(AS); "CHARACTERS"; 

99 END 



Function 



SAMPLE RUN (using ABC1 23) 

TYPE ANY COMBINATION OF LETTERS AND NUMBERS 

? ABC1 23 

YOU ENTERED ABC1 23 WHICH CONTAINS € CHARACTERS 

VARIATIONS IN USAGE 

None known. 

ALSO SEE 

ASC, FRE, LEFTS, MID$, RIGHTS, STRS, VAL 
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The LET statement is used to assign values to variables 
(e.g. let x=20). LET is required by a few computers, but 
is optional on most. When not required, it is sometimes 
used as a method of "flagging*' variables that are being 
assigned new values or where special identification is 
desired. 



TEST PROGRAM 

10 REM 'LET' TEST PROGRAM 

20 LET X=20 

30 PRINT "THE LET STATEMENT PASSED THE TEST IN L1NE";X 

99 END 




Statement 



SAMPLE RUN 

THE LET STATEMENT PASSED THE TEST IN LINE 20 

To determine if LET is required by your computer, delete LET from line 20 and try 
again. 

VARIATIONS IN USAGE 
None known. 
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The LGT(n) function computes the value of the common 
logarithm of any number (n) whose value is greater than 0. 
It is used in the Tektronix 4051 BASIC and MAX BASIC. 

TEST PROGRAM 

10 REM 'UGT' TEST PROGRAM 

20 PRINT "ENTER A POSITIVE NUMBER"; 

30 INPUT N 

40x=ugt ( n) Function 

50 PRINT "THE COMMON LOG O F" ;N ;" IS" ;X 
30999 END 

SAMPLE RUN (using 100) 

ENTER A POSITIVE NUMBER? 100 
THE COMMON LOG OF 100 IS 2 

If your computer failed the test program, see LOG 10 for a substitute subroutine and 
other conversion tips. 

VARIATIONS IN USAGE 

None known. 

ALSO SEE 

LOG 10, CLOG, LOG, LOGE, LN 



145 



LI is used by some computers (e.g. the T.I. 990) as an 
abbreviation for the LIST command. 

For more information see LIST. 
TEST PROGRAM 

10 REM 'LI (LIST}' TEST PROGRAM 
20 REM THIS COMMAND 
30 REM WILL DISPLAY EACH LINE 
40 REM AS HELD BY THE COMPUTER 
50 PRINT M, LI' TEST COMPLETE" 
99 END 




Command 



SAMPLE RUN 

After typing LI as a command, the computer should LIST the entire program. 

VARIATIONS IN USAGE 
None known. 

ALSO SEE 
LIST, LIS, L. 
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The LIN(n) statement (used in the Hewlett-Packard 2000 
BASIC and the Digital Group Opus 1 and Opus 2 BASIC) 
causes the computer to skip a specified number (n) of 
lines on a printer or CRT before printing the next line. 

TEST PROGRAM 

10 REM *L1N' TEST PROGRAM 

20 PRINT "THE LIN STATEMENT PASSED THE TEST" 

3 LIN (5) 

40 PRINT "IF 5 LINES ARE SKIPPED BEFORE THIS LINE IS PRINTED" 

99 END 

SAMPLE RUN 

THE LIN STATEMENT PASSED THE TEST 




Statement 



IF 5 LINES ARE SKIPPED BEFORE THIS LINE IS PRINTED 

IF YOUR COMPUTER DOESN'T HAVE IT 

If your computer does not have LN(n), it can be easily simulated by substituting (n) 
number of PRINT statements for LIN(n). 

For example, substitute the following line for line 30 in the TEST PROGRAM: 

30 PRINT:PRINT:PRINT:PRINT:PRINT 

Since each PRINT statement triggers a line-feed, the above line will cause the computer 
to perform the same operation as LIN(5), 

VARIATIONS IN USAGE 

None known. 

ALSO SEE 
PRINT 
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LIS is used in the PDP-8E as an abbreviation for the LIST 
command. 

For more information see LIST. 
TEST PROGRAM 

10 REM "LIS* TEST PROGRAM 

20 REM THIS COMMAND 

30 REM WILL DISPLAY EACH LINE 

40 REM AS HELD BY THE COMPUTER 

50 PRINT "'LIS' TEST COMPLETE'* 

99 END 




&#,&;*fttt-=toxa 



IfEfe 



Command 



SAMPLE RUN 

After entering LIS the computer should LIST the entire program. 

VARIATIONS IN USAGE 
None known. 

ALSO SEE 
LIST, LIS, L. 
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'The LIST command is used to display each program line 
in the numerical order in which it appears in the program. 
Some computers (or terminals) will scroll through the 
entire program list unless stopped by a specified key func- 
tion. (Control C, Control S, etc.) Others will stop after 
displaying the first 12, 16, 24 or more lines, then advance 
one additional line each time the up-arrow, down-arrow or 
other appropriate key is pressed. 

The LIST command can also be used in conjunction with Qt^tl man + 

a line number to specify a starting point other than at the 

beginning. Many computers will also accept a start and finish line number. For example, 

LisTt 0-20 or list 1 0-20 will list only those program lines with numbers from 10 to 20. 

TEST PROGRAM 

10 REM 'LIST* COMMAND TEST PROGRAM 

20 REM THIS COMMAND 

30 REM WILL DISPLAY EACH LINE 

40 REM AS HELD BY THE COMPUTER 

50 PRINT "LIST TEST COMPLETE" 

99 END 



SAMPLE RUN 

Type in LIST20-30 and your computer should print: 

20 REM THIS COMMAND 

30 REM WILL DISPLAY EACH LINE 

If your computer will not accept the line number limitations, then try entering LIST20. 
If this test fails, try entering LIST without line numbers. 

VARIATIONS IN USAGE 

Enter a longer program and try the following LIST commands: list- listi 00- list-i 00 

UST—100 

If your computer accepted these LIST commands, LIST- should have listed the entire 
program, LIST100- the program starting at line 100, and LIST-100 the program starting 
with the first line and ending with line 100. 

The LIST command is accepted by some computers as part of a program statement. To 
test this on your computer, add the following line to the Test Program: 60 list 
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LSdi 

If LIST is accepted as a program statement then it will print: 

LIST TEST COMPLETE 

10 REM 'LIST' COMMAND TEST PROGRAM 

20 REM THIS COMMAND 

30 REM WILL DISPLAY EACH LINE 

40 REM AS HELD BY THE COMPUTER 

50 PRINT "LIST TEST COMPLETE" 

60 LIST 

99 END 



ALSO SEE 
L., LIS, LI 



VI 50 



The LN(n) function (used by COMFAL Micropolis BASIC 
and DEC-17D BASIC) computes the value of the natural 
logarithm of any number (n) whose value is greater than 
0. It is a "shorthand" for the more common LOG(n) 

TEST PROGRAM 

10 REM 'UN' TEST PROGRAM 

20 PRINT "ENTER A POSITIVE NUMBER"; 

30 INPUT N 

40 L=LN(N) 

50 PRINT "THE NATURAL LOG O F" ;N ;"IS" ;L 

30999 END 




Function 



SAMPLE RUN (using 100) 

ENTER A POSITIVE NUMBER? 100 
THE NATURAL. LOG OF 100 IS 4.60517 

If your computer failed the test program, see LOG for a substitute subroutine and other 
conversion tips. 

VARIATIONS IN USAGE 

None known. 

ALSO SEE 

LOG, LOGE, LN, LOG 10, LGT 
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The LOAD command is used to load a program into the 
computer from cassette tape. 

TEST PROGRAM 

Enter this program into the computer from the keyboard, 
then store it on cassette tape. (See SAVE for details.) 

10 REM 'LOAD* TEST PROGRAM 

20 PRINT "THIS PROGRAM TESTS THE LOAD FEATURE" 

99 END 




SH035SI 





Command 



Once the program is recorded on cassette tape, erase the computer memory with NEW, 
SCRATCH or whatever is appropriate. 

Rewind the tape, then set the recorder to the PLAY mode and type the LOAD com- 
mand. 

The cassette recorder's motor is controlled by the computer which turns it on and off 
before and after the LOAD cycle. The cassette should "play back" the program, LOAD- 
ing it into the computer. 

List the program to verify that the program held in the computer's memory is identical to 
that originally entered (see LIST). If all looks well, RUN the program. 



SAMPLE RUN 

THIS PROGRAM TESTS THE LOAD FEATURE 

VARIATIONS IN USAGE 
None known. 

ALSO SEE 

CLOAD, SAVE, CSAVE, LIST, NEW 
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The LOG(n) function computes the natural logarithm of 
any number (n) whose value is greater than 0. For com- 
mon logs see LOG10, CLOG, CLG or LGT. 

TEST PROGRAM 

10 REM 'LOG' TEST PROGRAM 

20 PRINT "ENTER A POSITIVE NUMBER*'; 

30 INPUT N 

40 L=LOG(N) 

50 PRINT "THE NATURAL LOG OF";N;"IS";L 

30999 END 




Function 



SAMPLE RUfi (using 100) 



ENTER A POSITIVE NUMBER? 100 
THE NATURAL. LOG OF 100 IS 4,60517 



DIFFERENT WORDS FOR NATURAL LOG 
See LOGE and LN. 

IF YOUR COMPUTER HAS NONE OF THEM 

If they all fail, substitute the following subroutine: 



3 

301 

301 

301 

301 

301 

301 

301 

301 

301 

301 

301 

301 
301 
301 



GOTO 30999 

70 REM * NATURAL LOGARITHM SUBROUTINE * INPUT X, OUTPUT L 
72 REM USES A,B,C AND L INTERNALLY 
74 IF X > THEN 30180 
76 PRINT "LOG UNDEFINED AT";X 
78 STOP 
80 A=1 
82 B==2 
84 C = .5 
86 E = 

88 IF X >=A THEN 30202 
90 IF X < C THEN 30208 
92 X^(X-,707107)/(X+.7071 07) 
94 L=X*X 
96 L=(((.598 979*L-K9 61471 )*L+2-8 8539)*X+E-„5 }*.693 1 47 
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30198 IF ABS(L) < 1 E-6 THEN 30220 

30200 RETURN 

30202 X=C*X 

30204 E=E + A 

30206 GOTO 30188 

30208 X=B*X 

30210 E=E-A 

30215 GOTO 30190 

30220 L=0 

30225 RETURN 



To use this subroutine in the TEST PROGRAM, make these program additions: 



35 X^N 

40 GOSUB 30170 



CONVERSION FACTORS 

To convert natural log to common log, multiply the natural log times .434295. For 
example, x=log(n|*. 434295. To convert common log to natural log, multiply the 
common log times 2.3026. 

VARIATIONS IN USAGE 

A few computers (e.g. IMSAI 4K) use LOG to compute the COMMON LOG, not the 
NATURAL LOG (but this is the exception). 

ALSO SEE 
LN, LOGE, LOG 10, CLOG, CLG and LGT. 
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The LOGE(n) function computes the value of the natural 
logarithm of any number (n) whose value is greater than 
0, For common logs see CLG, LOG10, CLOG or LGT. 

TEST PROGRAM 

10 REM 'LOGE' TEST PROGRAM 

20 PRINT "ENTER A POSITIVE NUMBER"; 

30 INPUT N 

40 L=LOGE(N) 

50 PRINT "THE NATURAL LOG OF";Ni"IS";L 

30999 END 




Function 



SAMPLE RUN (for 100) 

ENTER A POSITIVE NUMBER? 100 
THE NATURAL LOG OF 100 IS 4.60517 

If your computer failed the TEST PROGRAM, try the TEST PROGRAMS in LOG and 
LN. If they also fail, substitute the subroutine found under LOG (saves space not to 
duplicate it here). 

To use that subroutine with this TEST PROGRAM, make these TEST PROGRAM 
changes: 

3 5 X=N 

40 GOSUB 301 70 



CONVERSION FACTORS 

To convert a natural log to a common log, multiply the natural log value times .434295. 

For example: x=loge(n)*. 434295 

To convert a common log to a natural log, multiply the common log value times 2.3026. 

ALSO SEE 

LOG, LN, CLG, CLOG, LOG10, LGT 
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Function 



The LOG10(n) function computes the value of the com- 
mon (base 10) logarithm of any number (n) whose value 
is greater than 0. 

TEST PROGRAM 

10 REM 'LOG 10' TEST PROGRAM 

20 PRINT "ENTER A POSITIVE NUMBER"; 

30 INPUT N 

40 X=LOG10(N) 

50 PRINT "THE COMMON LOG O F";N ;"1S" ;X 

30999 END 

SAMPLE RUN (fori 00) 

ENTER A POSITIVE NUMBER? 100 
THE COMMON LOG OF 100 IS 2 

IF YOUR COMPUTER DOESN'T HA VE IT 

If your computer failed the TEST PROGRAM, try the TEST PROGRAMS in LOG, 
CLOG and LGT. If they also fail, substitute the subroutine found under LOG (saves space 
not to duplicate it here). 

To make the subroutine compute the common logarithm (instead of the natural loga- 
rithm), make the following subroutine changes: 

30170 REM * COMMON LOGARITHM SUBROUTINE * INPUT X, OUTPUT X 
30200 GOTO 30223 
30223 X=^L* .4342945 

To use the LOG subroutine with the TEST PROGRAM, make these TEST PROGRAM 
changes: 



40 GOSUB 301 70 

CONVERSION FACTORS 

To convert a common log to a natural log, multiply the common log value times 23026. 

For example: x=logi#(n)*2.3026 

To convert a natural log to a common log, multiply the natural log value times .434295. 

ALSO SEE 

CLG, CLOG, LGT, LOG, LOGE, LN 
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LT is used in some computers (e.g. the TI 990) as an alter- 
nate word for the "less-than" sign ( < ). 

For more information see < . 



TEST PROGRAM 

10 REM 'LT (LESS-THAN)' TEST PROGRAM 
20 IF 5 LT 10 THEN 50 

30 PRINT "THE LT OPERATOR FAILED THE TEST" 
40 GOTO 99 

50 PRINT "THE LT OPERATOR PASSED THE TEST" 
99 END 




Operator 



SAMPLE RUN 

THE LT OPERATOR PASSED THE TEST 

VARIATIONS IN USAGE 

None known. 

ALSO SEE 
<., IF-THEN 
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M. is used in the TRS-80 Level I as an abbreviation for the 
MEM (memory) function. 
For more information see MEM. 

TEST PROGRAM 

10 REM *M. {MEM)' TEST PROGRAM 

20 PRINT M.; "BYTES OF MEMORY REMAINING" 

99 END 

SAMPLE Rim (typical) 

3500 BYTES OF MEMORY ARE REMAINING 

VARIATIONS IN USAGE 

None known. 

ALSO SEE 
MEM,FRE ; FREE(0) 




Function 
Command 
Statement 
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MAN is used in the APPLE II BASIC to allow MANual 
insertion of program line numbers. 

If the computer is in the AUTOmatic line numbering 
mode, control X must be typed before the computer can 
accept the MAN command. 



TEST PROCEDURE 

Command 

To test the computer's MANual feature, place the com- 
puter in the AUTOmatic line numbering mode by typing 

the command AUTO and pressing the RETURN key. If line number 10 is printed, the 
computer successfully went into the AUTOmatic mode. Now type control X and the 
command MAN. Enter a few test program lines to verify that the computer passed the 
MANual command test. 




VARIATIONS IN USAGE 

None known. 

ALSO SEE 

AUTO 
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MAT INPUT is used to assign values to each element in an 
array via the keyboard. The DIM statement establishes the 
number of array elements that may be assigned values. 

For example, 

10 DIM A(5) 

20 MAT INPUT A 

The DIM statement allows variable A to use 5 array ele- 
ments named A(l) to A(5). They are assigned values by 
the MAT INPUT statement. (For more information see DIM.) 









Statement 



When the MAT INPUT statement is executed, the computer prints a ? indicating it is 
ready to receive a value for the first element in the array. If all elements are to be filled in 
one pass, a comma must be typed after each value before the RETURN or ENTER key is 
pressed. If each element in the array did not receive a value before the RETURN or 
ENTER key is pressed, the computer prints a double question mark (??) indicating more 
values are needed . As with an ordinary INPUT statement, values can be entered one at a 
time, each followed by the RETURN. 

The MAT INPUT statement assigns values to each vertical column in the first row of two- 
dimensional-array variables before assigning values to the following horizontal row. 

For example, 

10 DIM A(2,3] 
20 MAT INPUT A 

The computer assigns values to array variable elements A(l,l), A(l,2), and A(l,3) before 
A(2,1),A(2,2), andA(2,3). 

Most MAT INPUT handling computers allow the array size to be established with the 
MAT INPUT statement if not more than 10 array elements are used. [e.g. MAT INPUT 
A(2,3).] If an array requires more than 10 elements, it must be DIMensioned. 

For example, 

10 DIM B(20,20) 

20 MAT INPUT A(3,5) 

30 MAT INPUT B(l5,t 1) 
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MAT INPUT = 

TEST PROGRAM 



10 REM 'MAT INPUT* TEST PROGRAM 

20 DIM A(3,4} 

30 PRINT "ENTER 12 NUMBERS (TYPE A COMMA BETWEEN EACH NUMBER}' 

40 MAT INPUT A 

5 FOR 1= t TO 3 

60 FOR J=1 TO 4 

70 PRINT A{I,J); 

80 NEXT J 

90 PRINT 

1 00 NEXT I 

110 PRINT "THE MAT INPUT STATEMENT PASSED THE TEST" 

120 PRINT "IF THE INPUT VALUES ARE PRINTED" / 

130 PRINT "IN A MATRIX HAVING THREE ROWS OF FOUR COLUMNS." 

999 END 



SAMPLE RUN (typical) 



ENTER 12 NUMBERS {TYPE A COMMA BETWEEN EACH NUMBER) 
?1 ,2,3,4,5,6,7,8,9,1 0,1 1 ,1 2 

12 3 4 

5 6 7 8 

9 10 11 12 

THE MAT INPUT STATEMENT PASSED THE TEST 
IF THE INPUT VALUES ARE PRINTED 
IN A MATRIX HAVING THREE ROWS OF FOUR COLUMNS. 



IF YOUR COMPUTER DOESN'T HA VE IT 

If your computer does not have the MAT INPUT capability, it can be replaced by FOR- 
NEXT and INPUT statements. Substitute the following lines in the TEST PROGRAM: 

33 FOR 1 = 1 TO 3 
36 FOR J=l TO 4 
40 INPUT A(I,J} 
43 NEXT J 
46 NEXT I 

This substitution differs slightly from the MAT INPUT statement in that it does require 
the RETURN or ENTER key to be pressed after each value is typed. 

VARIATIONS IN USAGE 

None known. 



ALSO SEE 

MAT PRINT, MAT READ, FOR-NEXT, INPUT, DIM 
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MAT PRINT is used to print the values stored in specified 
array elements. The number of elements printed is deter- 
mined by the DIMensioned value assigned to the array. 
For more DIMensioning information see DIM. 

For example, 

10 DIM A(3) 

20 MAT PRINT A 

prints the three element values assigned to the "A" array. 




Statement 



TEST PROGRAM #1 

10 REM 'MAT PRINT* TEST PROGRAM 

20 DIM A(5) 

30 FOR X=l TO S 

40 A(X} = X 

50 NEXT X 

60 MAT PRINT A 

70 PRINT "END OF MAT PRINT TEST" 

99 END 

SAMPLE RUN 



END OF MAT PRINT TEST 



Most computers with MAT PRINT capability allow a comma following the MAT PRINT 
statement, to print the array values in pre-established horizontal zones, (See Comma.) 
To test this feature in the TEST PROGRAM, change line 60 to: 

60 MAT PRINT A, 

and RUN. 
SAMPLE RUN 

12 3 4 5 

END OF MAT PRINT TEST 
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MAT PRINT ========^^ 

A semicolon (;) following the MAT PRINT statement may be used to print the array 
values in a horizontal line with spaces inserted for its + or — sign. (See Semicolon.) To 
test this feature, change line 60 to: 

60 MAT PRINT A; 

and RUN. 
SAMPLE RUN 

1 2 3 4 S 
END OF MAT PRINT TEST 

The MAT PRINT statement can print the contents of arrays having more than one dimen- 
sion. The number of elements in the first dimension specifies the number of rows to be 
printed while the number of elements in the second column determines the number of 
columns. 

For example, 

DIM A(2,3) 
MAT PRINT A 

The DIM statement establishes the A variable as being capable of storing values in a two 
dimensioned array which is printed by the MAT PRINT statement as a matrix having 2 
rows and 3 columns. 

The printing of more than one array can be ordered in one MAT PRINT statement by 
inserting a comma or semicolon between each array specified. The results are shown by 
the following TEST PROGRAM. 

TEST PROGRAM #2 

10 REM 'MAT PRINT' WITH MULTIPLE ARRAY VARIABLES TEST PROGRAM 

20 DIM A(3},B(3,5) 

30 FOR 1 = 1 TO 3 

40 FOR J = 1 TO 5 

50 B(I,J)»J 

60 NEXT J 

70 A(I) = I 

80 NEXT I 

90 MAT PRINT A;B, 

100 PRINT "END OF MAT PRINT TEST" 

999 END 
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IfiHi rniHi 
SAMPLE RUN 

t 2 3 

t 2 3 A S 

12 3 4 5 

12 3 4 5 

END OF MAT PRINT TEST 



IF YOUR COMPUTER DOESN'T HA VE IT 

If your computer does not have the MAT PRINT capability, it can be simulated with 
FOR-NEXT and PRINT statements. Substitute the following lines in TEST PROGRAM 

#2: 



81 


FOR X=t TO 5 


82 


PRINT A(X), 


84 


NEXT X 


86 


PRINT 


88 


FOR \^\ TO 3 


90 


FOR J=^1 TO 5 


92 


PRINT B(i,J) 


94 


NEXT J 


96 


NEXT I 


98 


PRINT 



ALSO SEE 

MAT INPUT, MAT READ, .(comma), ;(semicolon), FOR-NEXT, PRINT, DIM 
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MAT READ is used to read values from a DATA state- 
ment and assign them to an array. The DIM statement 
establishes the array size. 

For example, 

10 DIM A(5) 

20 MAT READ A 

Statement 

The DIM statement allows variable A to use 5 array elements named A(l) to A(5). For 
more information see DIM. f 

The MAT READ statement assigns values to each column in the first row of two- 
dimensional-array variables before assigning values to the following row. 

For example, 

10 DIM A(2,3} 
20 MAT READ A 

The computer reads six values from the DATA statement and assigns them to array vari- 
ables elements A(l,l), A(l,2), and A(l,3) before A(2,l), A(2,2), and A(2,3). 

TEST PROGRAM 

10 REM 'MAT READ* TEST PROGRAM 

20 DIM A(3,4) 

30 MAT READ A 

40 FOR 1 = 1 TO 3 

50 FOR J=l TO 4 

60 PRINT A(I,JJ; 

70 NEXT J 

80 PRINT 

9 NEXT 1 

100 DATA 1,2,3,4,5,6,7,8,9,10,11,12 

110 PRINT "THE MAT READ STATEMENT PASSED THE TEST" 

120 PRINT "IF A MATRIX IS PRINTED HAVING 3 ROWS OF 4 COLUMNS" 

999 END 

SAMPLE RUN 

12 3 4 

5 6 7 8 

9 10 11 12 

THE MAT READ STATEMENT PASSED THE TEST 
IF A MATRIX IS PRINTED HAVING 3 ROWS OF 4 COLUMNS 
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MAT READ ==============^^ 

Most MAT READ handling computers allow the array size to be established with the 
MAT READ statement if not more than 10 array elements are used. If more than 10 ele- 
ments are required in an array, it must be DIMensioned. 

For example, 

1 10 DIM 6(20,20) 

120 MAT READ A{3,5) 

130 MAT READ B(15,11} 

To test this feature in your computer, omit line 20 in the TEST PROGRAM and change 
line 30 TO: 

30 MAT READ A(3,4) 

If your computer accepts this feature, the SAMPLE RUN should not change. 

IF YOUR COMPUTER DOESN'T HA VE IT 

If your computer does not have the MAT READ capability, it can be replaced by FOR- 
NEXT and READ statements. 

Substitute the following lines in the TEST PROGRAM: 

23 FOR 1 = 1 TO 3 
26 FOR J^l TO 4 
30 READ A(l t J) 
33 NEXT J 
36 NEXT I 

VARIATIONS IN USAGE 

None known. 

ALSO SEE 

MAT PRINT, MAT INPUT, READ, DATA, DIM, FOR-NEXT 
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MEM is used with the Print statement to display the 
amount of unused bytes of MEMory remaining in the 
computer. MEM can also be used as a program statement. 

TEST PROGRAM 

10 REM 'MEM' TEST PROGRAM 

20 PRINT MEM; "BYTES OF MEMORY ARE REMAINING" 

99 END 




Command 
Statement 



SAMPLE RUN 

13504 BYTES OF MEMORY REMAINING 

(The amount of memory available will of course depend on the size of your computer.) 

VARIATIONS JN USAGE 

None known. 

ALSO SEE 

FRE, FREE(0), M. 
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MID(string,nl,n2) is used in the Harris BASIC-V and the 
DEC BASIC-PLUS-2 to isolate a specific number (n2) of 
string characters that are (nl) characters from the left- 
most character in the string. 

For example, print mid("computer",4,3) prints the 
letters PUT, which are the 3 MIDdle characters starting 
with the fourth string character from the left. 

For more information see MIDS. 




Function 



TEST PROGRAM 



10 REM 'MID' TEST PROGRAM 

20 AS = "CONTESTANT" 

3 PRINT "'MID' PASSED THE" 

40 PRINT MID(AS,4,4) 

99 END 

SAMPLE RUN 

'MID' PASSED THE TEST 

VARIATIONS IN USAGE 

None known. 

ALSO SEE 

MIDS 
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Function 



The MID$(string,nl,n2) function is used to isolate a 
specific number (n2) of string characters that are (nl) 
characters from the left-most character in the string. 

For example, print mid$("computer'\4,3) prints 
the letters PUT, which are 3 MIDdle characters starting 
with the fourth string character from the left. 



The string must be enclosed in quotes or assigned to a 
string variable. The number of characters and the start- 
ing position can be expressed as variables, numbers or 
arithmetic operations. A comma must separate each element in the MID$ function. 

If the value of nl or nl is a decimal, the computer automatically converts to the integer 
value . 

TEST PROGRAM 

10 REM 'MID®' TEST PROGRAM 

20 A$="CONTESTANT" 

30 B$=MID${A$,4,4) 

40 PRINT MIDSC'ATHENA' , ,2,3)" 'MID$' FUNCTION PASSED THE ";BS 

99 END 



SAMPLE RUN 

THE 'MIDS* FUNCTION PASSED THE TEST 

VARIATIONS IN USAGE 

None known. 

ALSO SEE 

MID, PRINT, RIGHTS, LEFTS, CHR$, SPACES, STRS, STRINGS, INKEYS 
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X MOD Y is used in some computers (e.g. the H.P. 3000, 
COMPAL, Harris Computer Systems, and Apple Com- 
puter) to compute the arithmetic remainder (MODulo) 
when the value X is divided by the value Y. 

For example, print 8 mod s prints the number 3, 
which is the remainder of 8 divided by 5. 

A few computers automatically integer the MODule value. 

For example, print i 0.5 mod 4 may print the number 
2 (the integer value of the 2.5 remainder). 




Function 



TEST PROGRAM 

10 REM 'MOD' TEST PROGRAM 

20 A - 13 MOD 5 

30IFA = 3 THEN 60 

40 PRINT "THE MOD FUNCTION PASSED THE TEST" 

50 GOTO 99 

60 PRINT "THE MOD FUNCTION PASSED THE TEST" 

99 END 

SAMPLE RUN 

THE MOD FUNCTION PASSED THE TEST 

IF YOUR COMPUTER DOESN'T HA VE IT 

MOD is handy but by no means indispensable. Here, step-by-step, is a way around it. 

20 A = 13/5 

22 A - A— INT(A) + .00l 

Z4A = INT(A*5) 

A more general form of the equation is 

20 A = INT{Y*{X/Y~~INT(X/Y)) + „001) 

Substitute 13 for X and 5 for Y and try it in the TEST PROGRAM. 
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MOD =========^^ 

VARIATIONS IN USAGE 

A few computers (e.g. the Harris BASIC-V) use MOD(X,Y) to compute the X MODulo Y 
value. 



ALSO SEE 

INT, FIX 
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N. is used in the TRS-80 Level I and other variations of 
Palo Alto Tiny BASIC as an abbreviation for the NEW 
command and the NEXT statement. 

The interpreter recognizes N. as NEW when it is used in 
the command mode, and as NEXT when it is used as a 
program statement following the FOR statement. 

This program uses N. as the command NEW. For more in- 
formation see NEW. 

TEST PROGRAM 

10 REM *N. (NEW)' TEST PROGRAM 
20 PRINT "HELLO THERE" 
99 END 




Command 
Statement 



SAMPLE RUN 

LIST the program to ensure it has been entered as shown. Type N. to erase the test pro- 
gram, then type LIST again to be certain the program has been "erased". 

This next program uses N. as the statement NEXT. For more information see NEXT. 



TEST PROGRAM 

10 REM 'N„ (NEXT)* TEST PROGRAM 

20 FOR X=t TO 5 

30 PRINT X; 

40 N„ X 

50 PRJNT " 'N„' PASSED THE TEST" 

99 END 

SAMPLE RUN 

12 3 4 5 'N.' PASSED THE TEST 

VARIATIONS IN USAGE 

None other known. 

ALSO SEE 

NEW, NEXT, NEX, NE 
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NE is used in a few computers (e.g. the T.I. 990) as an 
abbreviation for the NEW command and the "not-equal" 
( < > ) relational operator. It is recognized as NEW when 
used in the command mode, and as < > when used as a 
program statement. 

This program uses NE as the command NEW. For more 
information see NEW. 

TEST PROGRAM 

10 REM 'NE (NEW) 1 TEST PROGRAM 
20 PRINT "HELLO THERE" 
99 END 




Command 
Operator 



SAMPLE RUN 

LIST the program to ensure it has been entered as shown. Type NE to erase the TEST 
PROGRAM, then type LIST again to be certain the program has been "erased". 

This next program uses NE as the "not-equal" relational operator. For more information 
see < > . 



TEST PROGRAM 

10 REM 'NE ( < >)■ TEST PROGRAM 

20 A=10 

30 IF A NE 20 THEN 60 

40 PRINT "THE NE OPERATOR FAILED THE TEST" 

50 GOTO 99 

60 PRINT "THE NE OPERATOR PASSED THE TEST" 

99 END 

SAMPLE RUN 

THE NE OPERATOR PASSED THE TEST 

VARIATIONS IN USAGE 

None other known. 



ALSO SEE 

NEW, N., <> , >< 
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The NEW command erases the BASIC program(s) stored 
in memory. However, it does not erase the interpreter it- 
self. NEW is normally used when a new program is to be 
entered into the computer but the existing program is to 
be deleted. 



TEST PROGRAM 

10 REM 'NEW COMMAND TEST PROGRAM 
20 PRINT "HELLO THERE." 
99 END 




Command 



SAMPLE RUN 

LIST the program to be sure it has been entered as shown. Check the remaining memory 
space with the PRINT MEMory command (or PRINT FRE(0), or other appropriate 
command). 

Type NEW to erase the test program, then test for memory space again. There should be 
a corresponding increase in available memory. 

To be certain the program has been "erased", double-check by typing LIST. 
Some computers use the commands SCRATCH or UNSAVE instead,. 

VARIATIONS IN USAGE 

None known. 



74 




NEX is used in the PDP-8E as an abbreviation for the 
NEXT statement. 

For more information see NEXT. 
TEST PROGRAM 

10 REM 'NEX' TEST PROGRAM 

20 for x-i to s Statement 

3 PRINT X; 

40 NEX X 

50 PRINT " 'NEX* PASSED THE TEST" ,' 

99 END 

SAMPLE RUN 

'NEX 1 PASSED THE TEST 

VARIATIONS IN USAGE 

None known. 

ALSO SEE 

NEXT, N. 
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The NEXT statement is used to return program execution 
to the preceding FOR statement which uses the same 
variable. When the range of the FOR statement is exceed- 
ed, the computer continues program execution at the line 
following the NEXT statement. 

For example: 

10 FOR X=1 TO 3 
20 NEXT X 
99 END 




Statement 



The fourth time the NEXT statement is executed, the value of X is incremented to 4 
which exceeds the FOR statement range of 3 causing the computer to "fall through" to 
line 99. 

TEST PROGRAM 

10 REM 'NEXT' TEST PROGRAM 

20 FOR X=t TO 4 

30 PRINT X, 

40 NEXT X 

50 PRINT "THE 'NEXT' STATEMENT PASSED THE TEST/' 

99 END 

SAMPLE RUN 

12 3 4 

THE 'NEXT' STATEMENT PASSED THE TEST. 

Because NEXT statements return only to the preceding FOR statement which uses the 
same variable, it is possible with most computers to use "nested" FOR-NEXT statements. 
For more information see FOR-NEXT, 

TEST PROGRAM 

!0 REM TEST PROGRAM WITH NESTED 'NEXT' STATEMENTS 

20 FOR A^t TO 3 

30 FOR B=1 TO 4 

4 PRINT A;B, 

50 NEXT B 

60 NEXT A 

70 PRINT "THE 'NEXT' STATEMENT PASSED THE TEST WHEN NESTED" 

99 END 
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• NEXT = 

SAMPLE RUN 



1 1 


t 2 


t 3 


1 4 


2 1 


2 2 


2 3 


2 4 


3 1 


3 2 


3 3 


3 4 



THE 'NEXT' STATEMENT PASSED THE TEST WHEN NESTED 

A few computers allow execution of a NEXT statement which does not contain a vari- 
able. In this case, the computer returns to the preceeding FOR statement (regardless of 
its associated variable) so long as it has not exceeded its stated range. 

To test for this feature, run the second TEST PROGRAM after removing the variables A 
and B from the NEXT statements in line 50 and 60. The sample run should remain the 
same. 



VARIATIONS IN USAGE 

Some computers (e.g. DEC BASIC-PLUS-2) allow NEXT to be implied, under certain 
circumstances. The FOR is written, but not the NEXT. 

ALSO SEE 

FOR-NEXT, FOR 
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The NOTRACE command is used by the APPLE II BASIC 
to disable the trace function (see TRACE). NOTRACE 
may be used as a program statement to turn the trace off 
at specified areas in the program. 

TEST PROGRAM 

10 REM 'NOTRACE' TEST PROGRAM 

20 TRACE 

30 PRINT "EACH LINE SHOULD BE TRACED" 

40 NOTRACE 

50 PRINT "BY THE 'TRACE' STATEMENT" 

60 PRINT "UNTIL TURNED OFF BY THE 'NOTRACE' STATEMENT" 

99 END 




Command 
Statement 



SAMPLE RUN 



#30 EACH LINE SHOULD BE TRACED 
#40 BY THE 'TRACE* STATEMENT 
UNTIL TURNED OFF BY THE 'NOTRACE' STATEMEN1 



VARIATIONS IN USAGE 

None known. 

ALSO SEE 

TRACE, TRACE OFF, TROFF, TRACE ON, TRON 
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The ON ERROR GOTO statement is used to branch to an 
error subroutine, when a program error is encountered, 
without stopping program execution.. The ON ERROR 
GOTO statement must appear in the program before an 
execution error is anticipated. Any error encountered 
after the ON ERROR GOTO statement causes the compu- 
ter to execute the line number listed in the ON ERROR 
GOTO statement. 

TEST PROGRAM 




Statement 



10 REM «ON-ERROR-GOTO« TEST PROGRAM 

20 ON ERROR GOTO 100 

30 PRINT "ENTER A NUMBER AND IT'S INVERSE WILL. BE COMPUTED" 

40 INPUT N 

50 A=1/N 

60 PRINT "THE INVERSE O F" ;N ;**IS M ;A 

70 GOTO 30 

100 PRINT "THE INVERSE OF CANNOT BE COMPUTED -TRY AGAIN" 

1 10 RESUME 30 

999 END 



SAMPLE RUN (using 4 and 0) 

ENTER A NUMBER AND ITS INVERSE WILL BE COMPUTED?/* 
THE INVERSE OF 4 IS .25 

ENTER A NUMBER AND ITS INVERSE WILL BE COMPUTED? 
THE INVERSE OF CANNOT BE COMPUTED -TRY AGAIN 
ENTER A NUMBER AND ITS INVERSE WILL BE COMPUTED? 

(The error here was DIVISION BY ZERO. ) 

If ON ERROR GOTO is executed during an ON ERROR GOTO subroutine, the error 
message is printed and program execution stops. Test this feature by adding the follow- 
in line to the test program: 

105 ON ERROR GOTO 

A syntax error encountered by some computers causes the line containing the error to be 
printed by the edit feature after the ON ERROR GOTO statement has been executed 
and program execution has stopped. The computer is then in the Edit mode. To test this 
feature change line 50 in the TEST PROGRAM to: 

50 ILLEGAL. LINE 

The RESUME statement is normally used to return to the main program from an ON 
ERROR GOTO subroutine. 
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ON ERROR 
GOTO 



VARIATIONS IN USAGE 
None known. 

ALSO SEE 

ERROR, RESUME, ERR, ERL 
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ONC is used in the TRS-80 Level I and other variations 
of Palo Alto Tiny BASIC as an abbreviation for the ON- 
GOTO statement. 

For more information see ON-GOTO. 
TEST PROGRAM 

10 REM 'ON-G. (ON-GOTO)' TEST PROGRAM 

20 X=1 

30 ON X G. 60 

40 PRINT "'ON-G.' FAIL-ED THE TEST" 

50 GOTO 99 

60 PRINT '"ON-G. 1 PASSED THE TEST" 

99 END 




Statement 



SAMPLE RUN 

'ON-G/ PASSED THE TEST 

VARIATIONS IN USAGE 

None known. 

ALSO SEE 

ON-GOTO, ON-GOT 
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ON-GOSUB is a multiple subroutine branching scheme 
which incorporates a number of IF-GOSUB tests into a 
single statement. 

For example, on x gosub 100,200,300 instructs the 
computer to branch to subroutines starting at lines 100, 
200 or 300 if the integer value of X is 1 , 2 or 3 respective- 
ly. If INT X is less than 1 or more than 3 the tests in this 
ON-GOSUB example all fail. In some computers, execu- 
tion then defaults to the next program line; in other com- 
puters, the program "crashes" and an error message is 
printed. 




Statement 



TEST PROGRAM 

10 REM 'ON-GOSUB' TEST PROGRAM 

20 PRINT "ENTER THENUMBER t, 20R 3"; 

30 INPUT X 

40 PRINT "THE ON-GOSUB STATEMENT "; 

50 ON X GOSUB 100,200,300 

60 GOTO 20 

100 REM SUBROUTINE #1 

110 PRINT "BRANCHED TO SUBROUTINE #1" 

1 20 RETURN 

200 REM SUBROUTINE #2 

210 PRINT "BRANCHED TO SUBROUTINE #2" 

220 RETURN 

300 REM SUBROUTINE #3 

310 PRINT "BRANCHED TO SUBROUTINE #3" 

320 RETURN 

999 END 

SAMPLE RUN 

ENTER THE NUMBER 1, 2 OR 3? 1 

THE ON-GOSUB STATEMENT BRANCHED TO SUBROUTINE #1 

ENTER THE NUMBER I, 2 OR 3? 2 

THE ON-GOSUB STATEMENT BRANCHED TO SUBROUTINE #2 

ENTER THE NUMBER 1, 2 OR 37 3 

THE ON-GOSUB STATEMENT BRANCHED TO SUBROUTINE #3 

ENTER THE NUMBER 1 , 2 OR 37 



Use the same TEST PROGRAM and try entering decimal values larger than 1 but smaller 
than 4. 

Try values smaller than 1 , then larger than 4, 
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r= ON-GOSUB 



IF YOUR COMPUTER DOESN'T HA VE IT 

If your computer did not pass the ON-GOSUB test, substitute these lines: 

45 IF Xs=1 GOSUB 100 
50 IF X=2 GOSUB 200 
55 IF X=3 GOSUB 300 

If this subroutine works, the intrinsic INT functions can be duplicated by substituting 
these lines: 

45 IF INT(X)=1 GOSUB 100 
50 IF INT(X) = Z GOSUB 200 
55 IF INT(X)=3 GOSUB 300 

For other tricks involving the ON-GOSUB statement, see ON-GOTO. 

VARIATIONS IN USAGE 

None known. 



ALSO SEE 

ON-GOTO, ON-ERROR GOTO, ON-GOT, ON-G. 
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ON-GOT is used in the PDP-8E as an abbreviation for the 
ON-GOTO statement. 

For more information see ON-GOTO. 
TEST PROGRAM 

10 REM 'ON-GOT* TEST PROGRAM 

20 X=l 

30 ON X GOT 60 

40 PRINT "'ON-GOT' FAILED THE TEST" 

50 GOTO 99 

60 PRINT "'ON-GOT' PASSED THE TEST" 

99 END 




Statement 



SAMPLE RUN 

'ON-GOT' PASSED THE TEST 

VARIATIONS IN USAGE 

None known. 

ALSO SEE 

ON-GOTO, ON-G. 
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ON-GOTO is a multiple branching scheme which incor- 
porates a number of IF-THEN tests into a single state- 
ment. For example, on x goto 100,200,300 instructs 
the computer to branch to lines 100, 20$, or 300 if the 
value of X is 1, 2, or 3 respectively. If X is less than 1 or 
more than 3.999 the tests in this ON-GOTO example all 
fail and execution defaults to the next program line. 

The integer value of X cannot exceed the number of pos- 
sible branches in the statement. If the value of X is a deci- 
mal, the computer automatically finds its integer value 
and selects the appropriate branching line number. 




Statement 



TEST PROGRAM 

10 REM 'ON(X)GOTO' TEST PROGRAM 

20 PRINT "ENTER THE NUMBER 1, 20R 3" 

30 INPUT X 

40 PRINT "THE ON-GOTO STATEMENT"; 

50 ON X GOTO 100,200,300 

60 PRINT "FAILED THE TEST" 

70 GOTO 999 

100 PRINT "BRANCHED TO LINE 100" 

1 10 GOTO 20 

200 PRINT "BRANCHED TO LINE 200" 

210 GOTO 20 

300 PRINT "BRANCHED TO LINE 300" 

310 GOTO 20 

999 END 

SAMPLE RUN (using 1,2 and then 3) 

ENTER THE NUMBER 1 , 2 OR 3 

? 1 

THE ON-GOTO STATEMENT BRANCHED TO LINE 100 

ENTER THE NUMBER 1, 2 OR 3 

? 2 

THE ON-GOTO STATEMENT BRANCHED TO LINE 200 

7 3 

THE ON-GOTO STATEMENT BRANCHED TO LINE 300 

ENTER THE NUMBER 1, 2 OR 3 



Using the same TEST PROGRAM, try values smaller than 1, then larger than 3.999. 
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ON-GOTO 

IF YOUR COMPUTER DOESN'T HAVE IT 

If the computer did not pass the ON-GOTO test, substitute these lines: 



45 IF X=1 THEN 100 
50 IF X=2 THEN 200 
55 IF X=3 THEN 300 



If this substitution works, the intrinsic INT functions can be duplicated by substituting 
these lines. 

45 IF INT(X) = 1 THEN 100 
50 IF INT(X) = 2 THEN 200 
55 IF INT(X) = 3 THEN 300 

A TRICK 

Errors might occur in prior rounding of the value X producing a value slightly lower than 
the expected integer value. The ON-GOTO statement can be protected from this short- 
coming by slightly increasing the value X. For example: 

ON X+,1 GOTO 1 00 

If the value of X in this case had been rounded down to 1.99 instead of the expected 
value of 2.0, adding .1 puts X above 2 (2.09), which is then rounded down to the desired 
2.0 by the intrinsic integer function. If not, no harm is done. 

SHIFTING THE BASE 

When the value of X is not 1 , 2 or 3, an equation can take its place in order to make ON- 
GOTO usable. For example: 

ON X~~50 GOTO 100, 200, 300 

branches to lines 100, 200 or 300 when the value of X is 5 1 , 52 or 53 respectively. 

VARIATIONS IN USAGE 

Different interpreters may have a limit to the number of branching options (3 were used 
only for an example). 

ALSO SEE 

ON-GOSUB, ON-ERROR, ON-GOT, ON-G, 
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OPTION is used in the Harris BASIC-V with the BASE 
statement to define the BASE (lowest) variable array 
element as any integer value from to 10. 

For example, 

10 OPTION BASE=5 
20 DIM A(10) 




Statement 

If the OPTION BASE value is not specified, the computer assumes the BASE value to be 



The OPTION BASE statement defines this array as having 
6 elements [A(5) to A(10)] . 



For more information see BASE. 
TEST PROGRAM 

10 REM 'OPTION' TEST PROGRAM 

20 OPTION BASE=3 

30 DIM A(5) 

40 FOR X=3 TO 5 

50 A(X)^X 

60 NEXT X 

70 OPTION BASE-0 

80 FOR X=0 TO 2 

90 A(X) = X 

1 00 NEXT X 

1 1 FOR X=0 TO 5 

1 20 PRINT A(X); 

130 NEXT X 

140 PRINT "THE OPTION STATEMENT DID NOT CRASH" 

999 END 

SAMPLE RUN 

1 2 3 4 S THE OPTION STATEMENT DID NOT CRASH 



VARIATIONS IN USAGE 

ANSI BASIC uses OPTION BASE values and 1 , and an equal sign is not required fol- 
lowing the word BASE. 
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Statement 



The OUT statement is used to send a number (byte value) 
to a specified computer OUTput port. 

The OUT statement format is OUT (port,byte). 

The byte and port values must be positive integers or 
variables between and 255. For example: OUT 255,4 
sends the binary equivalent of 4 (decimal) to port number 
255. 

Press a PLAY, REWIND or FAST-FORWARD button on 
the cassette recorder and try this program. 

TEST PROGRAM (Configured for TRS-80 Level II) 

10 REM 'OUT' TEST PROGRAM 

20 PRINT "ENTER '4' TO TURN ON THE CASSETTE RECORDER MOTOR" 

3 INPUT X 

40 OUT 255.X 

50 PRINT "ENTER '0' TO TURN THE MOTOR OFF" 

60 INPUT X 

70 OUT 255.X 

99 END 

SAMPLE RUN 

ENTER '4' TO TURN ON THE CASSETTE RECORDER MOTOR 

? 4 

ENTER '0' TO TURN THE MOTOR OFF 

i 

If the cassette recorder motor did not turn on, try this program to find which port and 
byte numbers work for your computer. 

TEST PROGRAM 

10 REM 'OUT' SEARCH PROGRAM 

20 FOR P™0 TO 255 

30 FOR B=0 TO 255 

40 PRINT "PORT#";P, 

50 PRINT "BYTE #";B 

60 OUT P,B 

7 NEXT B 

80 NEXT P 

99 END 

VARIATIONS IN USAGE 

None known. 
ALSO SEE 

INP, PIN, PEEK, POKE 
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P. is used in the TRS-80 Level I and other variations of 
Palo Alto Tiny BASIC as an abbreviation for the PRINT 
statement. 

For more details see PRINT. 
TEST PROGRAM 

10 REM 'P.' TEST PROGRAM 
20 P. "'P.' PASSED THE TEST" 
99 END 




Statement 



SAMPLE RUN 

'P.' PASSED THE TEST 

VARIATIONS IN USAGE 

None known. 

ALSO SEE 

PRINT, PRI, ?, # 
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P.A. is used in the TRS-80 Level I as an abbreviation for 
the graphics PRINT AT statement. 

For more information see PRINT and AT, 



TEST PROGRAM 
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10 REM -P.A, {PRINT AT)' TEST PROGRAM 

20 P.A.I 28,"2. IF THIS UINE IS PRINTED AFTER UINE 1 ." Statement 

30 P.A.0,"1. THE 'P. A/ STATEMENT PASSED THE TEST," 

40 GOTO 40 

99 END 




SAMPLE RUN 

1. THE 'P. A.' STATEMENT PASSED THE TEST 

2. IF THIS LINE IS PRINTED AFTER UINE 1. 

VARIATIONS IN USAGE 
None known. 

ALSO SEE 

PRINT AT, PRINT, AT, @, TAB 
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PDL is a special function used in APPLE II BASIC to indi- 
cate the settings of two game control units. The control 
units are identified as PDL(0) and PDL(l). (PDL is an 
abbreviation for Paddle and refer to control game "pad- 
dles".) 



TEST PROGRAM 



10 REM PDL.' TEST PROGRAM FUIICtiOn 

20 A=PDL{0} 

30 B=PDL(1) 

40 PRINT "THE VALUE OF PDL(0) IS";A 

50 PRINT "THE VALUE OF PDL(1) IS";B 

60 PRINT "CHANGE THE CONTROL, UNIT SETTINGS AND (RUN) AGAIN" 

99 END 




SAMPLE RUN (typical) 



THE VALUE OF PDL(0) IS 13 

THE VALUE OF PDL(l] IS 146 

CHANGE THE CONTROL UNIT SETTINGS AND (RUN) AGAIN 

VARIATIONS IN USAGE 

None known. 

ALSO SEE 

GR, PLOT, COLOR 
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PEEK is used to read the contents of a specified address in 
the computer's memory. 

For example, x=peek 18370 assigns the numeric value 
stored in memory address 18370 to the variable X. 

The PEEK statement reports the contents of a memory 
address as a number between and 255 (the range of 
values that can be held in an 8-bit memory cell). PEEK 
can be used with the POKE statement to read what POKE 
has POKEd into memory. The highest number address 
that can be PEEKed of course depends on the computer's memory size. 

Check your computer's manual before executing this TEST PROGRAM to determine 
that memory addresses 18368 to 18380 are reserved as free memory. This avoids POKing 
data into memory addresses reserved for normal computer operation. If addresses 18368 
to 18380 are not reserved as free memory in your computer, then select a group of 12 
consecutive free memory addresses and change lines 20 and 60 in the TEST PROGRAM 
accordingly. 



Statement 



TEST PROGRAM (Configured for TRS-80 Level II) 

10 REM 'PEEK' TEST PROGRAM 

20 FOR X=18368 TO 18380 

30 READ Y 

40 POKE X,Y 

5 NEXT X 

60 FOR X=18368 TO 18380 

70 Y=FEEK(X) 

80 PRINT CHRS(Y); 

90 NEXT X 

100 DATA 84,69,83,84,128,67,79,77,80,76,69,84,69 

9 99 END 



SAMPLE RUN 



TEST COMPLETE 



The PEEK and POKE statements are also used with the USR(X) statement to run 
machine language subroutines. 

VARIATIONS IN USAGE 
None known. 
ALSO SEE 

POKE, USR(X), SYSTEM, EXAM, FETCH 



192 



PI is used to represent the value of u (3.14159265). 
TEST PROGRAM 

10 REM 'PI' TEST PROGRAM 

20 R = 6 

30 0=2*PI*R 

40 PRINT "THE CIRCUMFERENCE OF A C1RCUE" 

50 PRINT "WITH A RADIUS OF 6 FEET IS" ;C ;*' FE ET" 

99 END 




Function 



SAMPLE RUN 

THE CIRCUMFERENCE OF A CIRCLE 

WITH A RADIUS OF 6 FEET IS 37.6991 FEET 

IF YOUR COMPUTER DOESN'T HA VE IT 

If your computer does not have the PI capability, substitute the value 3.14159265 for it. 

VARIATIONS IN USAGE 

None known. 
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PIN is used by a few interpreters (e.g. Heath Benton 
Harbor BASIC) to read the decimal value of a byte of 
information at a specified computer port. The byte value 
can be any positive integer from to 255. 

For example, print pin(x) prints the decimal value of 
the byte at port X. 

TEST PROGRAM Function 

10 REM 'PIN' TEST PROGRAM 

20 FOR X=0 TO 255 

30 PRINT "THE DECIMAL VALUE OF THE BYTE AT PORT#" ;X;IS" ;INP(X) 

40 NEXT X 
99 END 

SAMPLE RUN (Typical) 

THE DECIMAL. VALUE OF THE BYTE AT PORT# IS 255 



THE DECIMAL. VALUE OF THE BYTE AT PORT# 225 IS 127 

ANOTHER WORD FOR PIN 

See INP 

VARIATIONS IN USAGE 
None known. 

ALSO SEE 

INP, OUT, PEEK, USR, INPUT 
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PLOT (nl, n2) is used in the APPLE II BASIC as a special 
feature to "turn on" or "light up" a colored graphics 
block in a predetermined grid on the screen. The graphics 
block color is determined by the COLOR statement. (See 
COLOR) 



The grid block to be lit is specified by the two numbers 
following the PLOT statement. The first number (nl) 
specifies the column and the second number (n2) specifies 
the row. Statement 

For example, plot i0,25 instructs the computer to color a graphics block located in the 
10th column and the 25th row (of the graphics grid). 

To "turn off individual graphics blocks, the color (black) must be selected for each 
block. Executing the GR statement erases the entire screen (See GR). 

The column number (nl) may range from to 39 and the row number from to 47, 
although only the rows to 39 are within the graphics area. The bottom 8 graphics rows 
on the screen are reserved for TEXT. Each line of text requires 2 rows, making it possible 
to place 4 lines of text under the graphics display. 

TEST PROGRAM 

10 REM 'PLOT' TEST PROGRAM 

20 GR 

30 COLOR - 4 

40 PLOT 0,0 

50 PLOT 39,0 

60 PLOT 39,39 

70 PLOT 0,39 

99 END 



SAMPLE RUN 

If the computer accepted the PLOT statement, a green dot should appear at each corner 
of the screen. 



VARIATIONS IN USAGE 

None known. 

ALSO SEE 

GR, COLOR, TEXT, HLIN-AT, VLIN-AT, SET, RESET, POINT 



195 



The POINT statement is used with IF-THEN statements 
by the TRS-80 as a special feature to indicate whether or 
not a specific graphics block is "turned on". 

The graphics block is specified by the X,Y coordinates 
enclosed in parentheses following the POINT statement. 
For Level I a value of 1 is reported back when the block is 
lit (level II gives back -1), and when the block is not lit. 

TEST PROGRAM 




Statement 



10 REM 'POINT' TEST PROGRAM 

20 CLS 

30 FOR X=20 TO 30 STEP 2 

40 SET(X,8) 

50 NEXT X 

60 PRINT "POINT PASSED THE TEST IF NUMBERS 10101010101 APPEAR' 

70 FOR X^20 TO 30 

80 A=0 

90 IF POINT (X,8) = 1 THEN A- 1 

100 PRINT A; 

1 10 NEXT X 

120 GOTO 1 20 

999 END 

SAMPLE RW (Level I) 

To obtain the same results for Level II, change line 90 to 

90 IF POINT(X,8)=-l THEN A=I 

POINT PASSED THE TEST IF NUMBERS 10101010101 APPEAR 
1010101010101 

VARIATIONS IN USAGE 
None known. 

ALSO SEE 

SET, RESET, CLS 
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POKE is used to store integer values from $ to 255 (deci- 
mal) in specified memory locations. For example, poke 
65,1 5360 places the ASCII number 65 (which is the letter 
'A') in memory address 1 5360. 

Check your computer's manual before running this test 
program to determine that memory addresses 15360 to 
16383 are in the computer's CRT memory area, and can 
be POKEd without erasing memory dedicated to another 
use. 




Statement 



TEST PROGRAM 

10 REM 'POKE 1 TEST PROGRAM 

20 REM USES CRT MEMORY ADDRESSES 15360 TO 16383 

30 FOR Y = 65 TO 90 

40 FOR X=15360 TO 16383 

50 POKE X,Y 

60 NEXT X 

70 NEXT Y 

99 END 

SAMPLE RUN 

The computer passed this POKE test if the screen filled with letters from A to Z. 

VARIATIONS IN USAGE 

None known. 

ALSO SEE 

PEEK, FILL, STUFF 



197 



PRI is used in the PDP-8E as an abbreviation for the 
PRINT statement. 

For more details see PRINT, 
TEST PROGRAM 

10 REM 'PRI' TEST PROGRAM 

20 PRI "'PRI' PASSED THE TEST" 

99 END 




Statement 



SAMPLE RUN 

'PRI- PASSED THE TEST 

VARIATIONS IN USAGE 
None known. 

ALSO SEE 
PRINT, P. 



198 



PRINT has a wide range of uses. The most common is in 
program statements used to display variable values or what- 
ever may be enclosed in quotes. For example, PRINT X 
prints the numeric value of the variable X, while PRINT 
"X" prints the letter X. 

Most computers use PRINT both as a command (as you 
would on a standard calculator), and a program state- 
ment. 



For example, the command, print 4*t 2/(2+6) prints the answer 6. 




Command 
Statement 



TEST PROGRAM #1 



10 REM 'PRINT' TEST PROGRAM 

20 PRINT "THE PRINT STATEMENT WORKS" 

99 END 

SAMPLE RUN 

THE PRINT STATEMENT WORKS 



A comma can be used in a PRINT statement to cause individual items to be printed in 
pre-established horizontal zones of about 16 spaces wide. 

For example, print 1 ,2 t 3,4 prints in a format similar to; 



For more information see ,(comma). 
TEST PROGRAM #2 

10 REM 'PRINT' WITH COMMA TEST PROGRAM 

20 PRINT "THE COMMA WORKED IN THE PRINT STATEMENT" 

30 PRINT "tFTHESE NUMBERS ARE PRINTED IN 4 ZONES" 

40 PRINT 1,2,3,4 

99 END 

SAMPLE RUN 

THE COMMA WORKED IN THE PRINT STATEMENT 
IF THESE NUMBERS ARE PRINTED IN 4 ZONES 
t 2 3 4 
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PRINT = 

A semicolon works like a comma, but prints the output values tightly together, instead of 
in pre-established zones. 

Change line 40 to read 

40 PRINT 1 ;2;3;4 

Run the Test Program once more and note the new spacing. 

The semicolon (;) is often used in PRINT statements to join together (concatenize) parts 
of words or sentences on one line. 

For example, print M H";"r* prints the word "HI". 

For more information see ;(semicolon). 

TEST PROGRAM #3 

10 REM 'PRINT' WITH SEMICOLON TEST PROGRAM 
20 PRINT "IS THIS PRINTED "; 
30 PRINT "ON ONE LINE?" 
99 END 

SAMPLE RUN 

IS THIS PRINTED ON ONE LINE? 

TAB(n) is used with the PRINT statement in a manner similar to the tab key on a type- 
writer. It inserts (n) spaces before the printed statement as specified by the value enclosed 
in parentheses. For more information see TAB. 

The AT function is used with PRINT in the TRS-80 Level I BASIC (the @ operator is 
used by the TRS-80 Level II) to specify the PRINT statement's starting location. For 
more information see AT and @. 

PRINT USING is used by some computers as a special PRINT feature which allows num- 
bers or strings to be printed USING a specified format. 

For example, print using "**###„##" ; i 2-5 prints the number ***t2.50. 

For more information see PRINT USING. 

MAT PRINT prints the values stored in array variables. 
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r= PRINT = 

For example, 



10 DIM A(3) 

20 MAT PRINT A 

will print the values assigned to array variables A(l), A(2), and A(3). For more 
information see MAT PRINT. 

PRINT* is used in the TRS-80 Level I BASIC to store data on cassette tape. To store 
more than one value with one PRINT* statement, the following format is used; 

PRINT#A;",";B;'Y , ;C etC. 

To test this feature, set the cassette recorder to the Record mode and RUN this program. 
TEST PROGRAM #4 

!0 REM 'PR1NT#' TEST PROGRAM 

20 PRINT "DATA SHOULD BE RECORDING ON CASSETTE TAPE" 

30 A$="TEST" 

40 PRiNT#AS;",";1 ;'\" ;2;" ," ;3 

50 PRINT "PRINT # HAS COMPLETED THE DATA TRANSFER" 

99 END 

SAMPLE RUN 

DATA SHOULD BE RECORDING ON CASSETTE TAPE 
PRINT* HAS COMPLETED THE DATA TRANSFER 

The TRS-80 Level II BASIC requires -1 following the PRINT* statement for use with a 
single cassette. 

For example, print#-i ,a ( b,c$ stores on tape the values assigned to variables A, B and 

C$. 

TEST PROGRAM #5 

Set the cassette recorder to the Record mode and RUN this program. 

10 REM 'PRINT#' TEST PROGRAM 

20 PRINT "DATA SHOULD BE RECORDING ON CASSETTE TAPE" 

30 PR1NT#-1,"TEST",1 ( 2,3 

40 PRINT "PRINT#-t HAS COMPLETED THE DATA TRANSFER" 

99 END 
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PRINT = 

SAMPLE RUN 



DATA SHOULD BE RECORDING ON CASSETTE TAPE 
PRINT* 1 HAS COMPLETED THE DATA TRANSFER 

To verify that the data was stored, rewind the tape, set the recorder to the Play mode 
and RUN this program. 

10 REM * INPUT DATA FROM CASSETTE * 

20 PRINT "THE COMPUTER SHOULD BE READING DATA FROM CASSETTE" 

30 INPUT#-1,AS,A,B,C 

40 PRINT "THE FOLLOWING DATA WAS READ FROM THE CASSETTE" 

50 PRINT A$,A,B,C 

99 END 

SAMPLE RUN 

THE COMPUTER SHOULD BE READING DATA FROM CASSETTE 
THE FOLLOWING DATA WAS READ FROM THE CASSETTE 
TEST 1 2 3 

PRINT* is used in mini and maxi computers with file handling capability to store data 
in "files" on an external device such as cassette or disc. Each data file is identified by 
a number (file name) which can be listed in the PRINT* statement to specify the file in 
which the data is to be stored. The data can consist of numeric values or string charac- 
ters. 

For example, print#3;a,b, "testing" stores the contents of variables A and B and 
the word "TESTING" in a file named #3. FILE*, INPUT* and READ* are used to 
assign file names and space for data storage, and to READ the data back out of file 
storage. 

ALSO SEE 

TAB, AT, @, PRINT USING, MAT PRINT, #, .(comma), ;(semicolon) 
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PRINT AT is used by the TRS-80 Level I BASIC to indi- 
cate a PRINT statement's starting location. The AT func- 
tion value may be a number, numeric variable, or mathe- 
matical operation. A comma or semi-colon must be 
inserted between the AT value and the string. 

For example: 

10 PRINT AT 420, "HEULO" 
20 PRINT AT {420);"HELLO" 




Statement 



Both lines print the word "HELLO" AT location 420. The parentheses are optional. 
For more information see AT. 

TEST PROGRAM 

10 REM "PRINT AT* TEST PROGRAM 

20 PRINT AT 1 28,"2. IF THIS LINE IS PRINTED AFTER UINE 1 ." 

30 PRINT AT 0,"1. THE 'PRINT AT* STATEMENT PASSED THE TEST" 

40 GOTO 40 

99 END 

SAMPLE RUN 

1. THE 'PRINT AT* STATEMENT PASSED THE TEST 

2. IF THIS UINE IS PRINTED AFTER LINE 1. 

VARIATIONS IN USAGE 

None known. 

ALSO SEE 

PRINT, AT, @, TAB, P.A. 
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PRINT USING is used in some computers (e.g. the ADDS 
BASIC, Sperry/Univac VS/9, H.P. 2000 and those using 
Microsoft BASIC) as a special PRINT feature which allows 
numbers or strings to be printed USING a variable format. 
PRINT USING is by far the most powerful (and complex) 
PRINT statement available in BASIC, so its many features 
will be covered here one at a time. Not every feature is 
part of every computer, but the TEST PROGRAMS will 
quickly let you identify what yours can do. See your own 
computer's manual for other possible capabilities. 




Statement 



The pound sign (#) reserves a position for each digit in a number or numeric variable to 
the left and right of a decimal point. Zeros are automatically inserted if nothing exists to 
the right, making it valuable for financial printing. # always prints the decimal point in 
the same place, making it easier to examine rows of numbers. For more information 

see #. 

TEST PROGRAM #1 



10 REM 'PRINT USING' TEST PROGRAM 

20 PRINT "THE # OPERATOR PASSED THE PRINT USING TEST" 

30 PRINT "IF THE FOLLOWING NUMBERS ARE PRINTED" 

40 FOR X=1 TO 5 

50 READ N 

60 PRINT USING "#######.## ";N 

70 NEXT X 

80 DATA 1.2,400.2400000,82450.5,-25 

99 END 



SAMPLE RUN 



THE # OPERATOR PASSED THE PRINT USING TEST 
IF THE FOLLOWING NUMBERS ARE PRINTED 
1.20 

400.00 

2400000.00 

82450.00 

-0.25 



An asterisk (*) can be printed in all unused spaces to the left of a specified number's 
decimal noint hv niacin? a double asterisk f**^ before the #. Tts nrimary mimosa is to 
prevent someone from increasing the size of a check printed by computer. 
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PRINT USING ============^ 

For example, print using ■■**#####. ##";234. 25 will print ****234.25. This feature 
can be tested by making these changes to the TEST PROGRAM # 1 . 

20 PRINT "THE ** OPERATOR PASSED THE PRINT USING TEST 
60 PRINT USING «•**######„## ";N 

SAMPLE RUN 

THE ** OPERATOR PASSED THE PRINT USING TEST 
IFTHE FOLLOWING NUMBERS ARE PRINTED 

*******1 „20 

*****400.00 

*2400000.00 

***82450.50 

******~0.25 

A $ sign can be printed before the number listed in the PRINT USING statement by 
inserting a double dollar sign ($$) before the # sign. 

For example, print using "$$###. ##";i .25 will print si .25. To test this feature in 
your computer, make these changes to TEST PROGRAM #1 : 

20 PRINT "THE $$ OPERATOR PASSED THE PRINT USING TEST 
60 PRINT USING "S$ ######.## ";N 



SAMPLE RUN 

THE $$ OPERATOR PASSED THE PRINT USING TEST 
IP THE FOLLOWING NUMBERS ARE PRINTED 
SI. 20 

$400.00 

$2400000.00 

$82450.50 

-$0.25 

It is possible to insert a comma between every third number to the left of the decimal 
point by using a comma between one or more left # signs. The position of the comma in 
the PRINT USING statement does not effect the position of the printed comma. 



For example, 






PRINT USING 


-#,####.##" 


;t2000 


PRINT USING 


■ ####,#.##" 


-.12000 


PRINT USING 


• #,##,#,#.## 


"512000 


will each print the number 12,000.00. 
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PRINT USING =======^^ 

To test this feature, make these changes to TEST PROGRAM #1 . 

20 PRINT "PRINT USING 'COMMA' PASSED THE TEST" 
60 PRINT USING "#,#######.##" ;N 



SAMPLE RUN 

PRINT USING 'COMMA' PASSED THE TEST 

IF THE FOLLOWING NUMBERS ARE PRINTED 

1.20 

400.00 

2,400,000.00 

82,450.50 

-0.25 

A + sign placed to the left of the #'s causes a + sign to be printed before each positive 
number and a - sign before each negative number. If a + sign is placed to the right of the 
#'s, the computer prints a — sign to the right of all negative numbers, and a space is 
inserted to the right of all positive numbers. 

For example, 

PRINT USING "+####";t 23 
PRINT USING "#### + ";-123 

will print the numbers 

+ 123 

and 1 23- 

To test this feature, make these changes to TEST PROGRAM #1 

20 PRINT "THE + OPERATOR PASSED THE PRINT USING TEST" 
60 PRINT USING " + #######.## ";N 

SAMPLE RUN 

THE + OPERATOR PASSED THE PRINT USING TEST 
IF THE FOLLOWING NUMBERS ARE PRINTED 

+ 1.20 

+ 400.00 

+ 2400000,00 

+ 82450.50 

-0.25 

Four exponentiation signs ( A A A A ) can be used following a # to print numbers 
expressed in exponential or scientific notation. A few computers (e.g. the TRS-80 Level 
II) use fit t instead. 
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PRINT USING ===^=====^^ 

For example, print using ••## a A A A •• ; i00 prints the number 1E+02 
TEST PROGRAM #2 

10 REM 'PRINT USING EXPONENTIATION' TEST PROGRAM 

20 PRINT "PRINT USING * A A A A . PASSED THE TEST" 

30PR1NT"IFTHE N UMBER" ;1 23456 

40 PRINT "IS PRINTED USING SCIENTIFIC NOTATION" 

50 PRINT USING "## A A A A ";1234S6 

99 END 

SAMPLE RUN 

PRINT USING ' A A A A • PASSED THE TEST 

IF THE NUMBER 123456 

IS PRINTED USING SCIENTIFIC NOTATION 

1E + 05 

Some computers (e.g. those with variations of the Microsoft BASIC) use the ! (enclosed 
in quotes) to print only the left-most character in a string or string variable listed in a 
PRINT USING statement. 

For example, print using "!";"word m prints the letter "W". 
TEST PROGRAM #3 

10 REM 'PRINT USING 1' TEST PROGRAM 

20 PRINT "ENTER A SAMPLE WORD"; 

3 INPUT AS 

40 PRINT "THE PRINT USING STATEMENT AND THE I OPERATOR" 

50 PRINT "PASSED THE TEST IF THE FIRST LETTER IN ";A$;" IS "; 

60 PRINT USING "I";A$ 

99 END 

SAMPLE RUN (using HANDBOOK) 

ENTER A SAMPLE WORD? HANDBOOK 

THE PRINT USING STATEMENT AND THE 1 OPERATOR 

PASSED THE TEST IF THE FIRST LETTER IN HANDBOOK IS H 

Use of \\ (backslash) permits printing only the left -most characters in strings* The number 
printed is determined by the number of spaces between the two \ signs. The computer 
also counts the two \ signs as character positions, therefore, no less than two characters 
can be specified by \\. 

For example, print using "Wvcompusoft" prints the first three letters "COM" 
because one space is included between the two \ signs (1 space + 2 backslashes = 3 
letters). The TRS-80 Level II uses the % sign instead of the \sign. 
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PRINT USING = 

TEST PROGRAM #4 



10 REM 'PRINT USING V TEST PROGRAM 

20 AS - "TESTIFIED" 

30 PRINT "THE PRINT USING STATEMENT "; 

40 PRINT "AND THE \ OPERATOR PASSED THE "; 

50 PRINT USING "\ \";A$ 

99 END 

SAMPLE RUN 

THE PRINT USING STATEMENT AND THE \ OPERATOR PASSED THE TEST 

Most computers allow the PRINT USING operators, numbers and strings to be specified 
as variables. 

For example, 

10 AS = "I" 

20 BS="ABCD" 

30 PRINT USING A$;B& 

will print the letter "A" which is the left-most character assigned to string variable B$. 

Test Program #5 shows how 3 different PRINT formats can be linked together by semi- 
colons. 

TEST PROGRAM #5 

10 REM 'PRINT USING VARIABLES' TEST PROGRAM 

20 A$="**$####.##" 

30 BS = "\ \" 

40 C$="TESTIMON1AL" 

50 A=1 4.95 

60 PRINT "THE BASIC HANDBOOK PASSED THE "; 

70 PRINT USING AS;A; 

80 PRINT USING B$;C$ 

99 END 

SAMPLE RUN 

THE SASIC HANDBOOK P ASSFD THF! ^^fu .95 Tt?5T 

The same results can be achieved by putting the format on one line, and on another line 
the variables to be printed. Delete lines 30 and 80 and change 

20 AS = "**$####„ ##\ \" 
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PRINT USING =========^^ 

Or better yet, 

20 AS - "% %****$####.##% %'* 

70 PRINT USING $A;B$,A,C$ 

(Note that commas can be used instead of semicolons after all but the PRINT USING 
specifier.) 

VARIATIONS IN USAGE 

Some computers (e.g. the DEC-10, DEC-17D and the Sperry/Univac VS/9) require that 
when variables are printed in one line, and the PRINT USING format in another line, the 
format line must be addressed by number and must start with a colon. 

For example, 

60 A - 1 2,34 

70 B - 14.95 

80 C$ - "MAIN FRAME" 

90 PRINT USING 100,A,B,C$ 

100 :###,## $$$$.## /CCCCCCC/ 

will print 

12.34 $14.95 MAINFRAME 

TEST PROGRAM #6 

10 REM 'PRINT USING LINE NUMBER' TEST PROGRAM 

20 PRINT "THE PRINT USING STATEMENT PASSES THE TEST" 

30 PRINT "IF THE NUM BER " ;1 25 .50 ;"IS PRINTED NEXT" 

40 PRINT USING 50,125.5 

50 :###.## 
99 END 

SAMPLE RUN 

THE PRINT USING STATEMENT PASSES THE TEST 
IF THE NUMBER 125.50 IS PRINTED NEXT 
125.50 

ALSO SEE 

PRINT, #, **,A, !, t,+, -,% 
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R. is used in the TRS-80 Level I and other variations of 
Palo Alto Tiny BASIC as an abbreviation for the RUN 
command, the RND function, and the graphics RESET 
statement. 

The interpreter recognizes R. as RUN when used in the 
command mode, as RND when followed by a value en- 
closed in parenthesis [e.g. r. (10)] , and as RESET when 
followed by two values enclosed in parenthesis and sepa- 
rated by a comma [e.g. r.(x,y)] . 

This first program uses R. as a RUN command. For more 
information see RUN. 




Command 

Function 

Statement 



TEST PROGRAM 

10 REM 'R. (RUN)* TEST PROGRAM 

20 PRINT "THIS LINE PRINTED COURTESY OF THE R. COMMAND," 

99 END 

SAMPLE RUN 

After entering the R, command, the computer should print 

THIS LINE PRINTED COURTESY OF THE R„ COMMAND. 

This program uses R. as a RND function. For more information see RND. 
TEST PROGRAM 

10 RE.M 'R. {RND} 1 TEST PROGRAM 

20 N=t0 

30 FOR X=t TO 4 

40 PRINT R.(N), 

50 NEXT X 

60 PRINT "'R,' PASSED THE TEST" 

99 END 
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■ R. 

SAMPLE RUN (Typical) 

1 7 5 6 

•R', PASSED THE TEST 

This last program uses R. as the graphics RESET statement. For more information see 
RESET. 

TEST PROGRAM 

t0 REM 'R. (RESET)' TEST PROGRAM 

20 FOR X=0 TO 127 

30 SET(X.t) 

40 R,(X,1) 

50 NEXT X 

60 PRINT "'R.' PASSED THE TEST" 

99 END 

SAMPLE RUN 

Will produce a blinking dot moving from left to right across the screen. 

VARIATIONS IN USAGE 

None other known. 

ALSO SEE 

RUN, RND, RESET, SET 
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RAN is used in the PDP-8E as an abbreviation for the 
RANDOMIZE statement. 

For more information see RANDOMIZE. 
TEST PROGRAM 

10 REM 'RAN' TEST PROGRAM 

20 RAN 

30 FOR X=1 TO 8 

40 PRINT RND(0), 

50 NEXT X 

99 END 




Statement 



SAMPLE RUN (Typical) 



.340512 

.407168 



.604461 
.072483 



.480241 
.659667 



.101441 
.517459 



VARIATIONS IN USAGE 

None known. 

ALSO SEE 

RANDOMIZE, RANDOM, RAND, RND 
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RANDOM is used to "shuffle" or "randomize" a set of 
numbers (held in the computer) in a random order. These 
numbers are selected by the RND function. 

Placing RANDOM in a program before the RND function 
causes the generation of a new set of random numbers for 
the RND function each time the program is run. 

TEST PROGRAM 

igf REM 'RANDOM' TEST PROGRAM 

20 RANDOM 

30 FOR X=l TO 8 

40 PRINT RND(0), 

50 NEXT X 

99 END 




Statement 



SAMPLE RUN (Typical) 



361529 
.999239 



.913284 
.407567 



.289381 
.458299 



.819987 
..684127 



Each time the test program is run, a new set of random numbers should be printed. Be 
sure you have your own version of RND working before trying to include line 20. 

VARIATIONS IN USAGE 

None known, 

ALSO SEE 

RANDOMIZE, RAN, RND, RAND 
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RANDOMIZE is used to "shuffle" or "reseed" a set of 
numbers (held in the computer) in a random order. These 
numbers are held in memory for selection by the RND 
function. 

Placing RANDOMIZE in a program before the RND func- 
tion causes the generation of a new set of random num- 
bers. for the RND function each time the program is run. 

TEST PROGRAM 




Statement 



10 REM 'RANDOMIZE* TEST PROGRAM 

20 RANDOMIZE 

30 FOR X=1 TO 8 

40 PRINT RND, 

50 NEXT X 

99 END 



SAMPLE RUN (Typical) 



.250186 
.890564 



.975707 
.227299 



.775985 
.408976 



.544615 
.771341 



Each time the test program is run, a new set of random numbers should be printed. Be 
sure you have your own version of RND working before trying to include line 20. 

VARIATIONS IN USAGE 

None known. 

ALSO SEE 

RANDOM, RAN, RND, RAND 
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REA is used in the PDP-8E as an abbreviation for the 
READ statement. 

For more details see READ. 
TEST PROGRAM 

10 REM 'REA' TEST PROGRAM 

20 REA A 

30 PRINT '"REA* PASSED THE TEST IN LINE";A 

40 DATA 20 

99 END 




Statement 



SAMPLE RUN 

'REA* PASSED THE TEST IN LINE 20 

VARIATIONS IN USAGE 

None known. 

ALSO SEE 
READ, REA. 
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REA. is used in the TRS-80 Level I as an abbreviation for 
the READ statement. 

For more information see READ. 
TEST PROGRAM 

10 REM 'REA.' TEST PROGRAM 

20 REA. A 

30 PRINT "'REA.' PASSED THE TEST IN LINE";A 

40 DATA 20 

99 END 






BliliHAIiiig 



^^S^^gssssss^s^?$S^^^^ 



Statement 



SAMPLE RUN 

'REA.' PASSED THE TEST IN LINE 20 

VARIATIONS IN USAGE 
None known. 

ALSO SEE 
READ, REA, DATA 
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The READ statement is used to read data from a DATA 
line and assign that data to a variable. 

Each time the READ statement is executed, data is read 
from a DATA line. The pointer then moves to the next 
item of data in the DATA line(s) and waits for another 
READ statement. When the last piece of data has been 
read from all DATA statements, the data pointer must be 
reset to the beginning of the DATA list before additional 
READ statements can be executed. (See RESTORE) 




Statement 



TEST PROGRAM 

10 REM 'READ 1 STATEMENT TEST PROGRAM 

20 READ A 

30 PRINT "THE READ STATEMENT WORKED IN LINE";A 

40 DATA 20 

99 END 

SAMPLE RUN 

THE READ STATEMENT WORKED IN LINE 20 

Since computers will allow more than one variable to be placed in one READ statement, 
each variable must be separated by a comma and the number of "reads" must not exceed 
the number of data items. 

TEST PROGRAM 

10 REM 'MULTIPLE READ' STATEMENT TEST PROGRAM 

20 READ A t B,C 

30 D=A+B+C 

40 PRINT "D =";D 

50 PRINT "THE READ STATEMENT PASSED THE TEST IF D = 60" 

60 DATA 10,20,30 

99 END 

SAMPLE RUN 

D - 60 

THE READ STATEMENT PASSED THE TEST IF D - 60 

Most computers will also allow strings to be read from DATA statements. Each time a 
string is to be read from the DATA statement, it must have a corresponding string vari- 
able in a READ statement. 
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TEST PROGRAM 

10 REM 'READ STRINGS' TEST PROGRAM 

20 READ D$ 

30 PRINT "THE READ STATEMENT PASSED THE ";D$ 

40 DATA TEST 

99 END 

SAMPLE RUN 

THE READ STATEMENT PASSED THE TEST 

Many computers allow both numeric and string data to be read by the same READ 
statement and be contained in the same DATA line. 

TEST PROGRAM 

1 REM 'MULTIPLE READ' STATEMENT TEST PROGRAM 

20 READ A,B,C,D$ 

30 D=A + B + C 

40 PRINT "THE READ STATEMENT PASSED THE TEST IN ";D$;D 

50 DATA 2, 8, 10, LINE 

99 END 

SAMPLE RUN 

THE READ STATEMENT PASSED THE TEST IN LINE 20 

VARIATIONS IN USAGE 

None. The only other way to store and call up data is by inputting it through a keyboard 
or from off-line storage on tape, disc, etc. 

ALSO SEE 

DATA, RESTORE, Comma(,) 
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The REMark statement is used at the beginning of some 
program lines to make them serve as a "notebook" or 
"scratchpad" to hold comments about the program. The 
REM statement is not executed. Everything on a line 
beginning with REM is ignored by the computer. 

If used in multiple statement lines, those statements pre- 
ceeding the REM statement will be executed, but every- 
thing following a statement beginning with REM is 
ignored. If the information to be noted requires more 
than one program line, each such line must begin with 
REM, 




Statement 



TEST PROGRAM 



10 PRINT "'REM* TEST PROGRAM" 

20 REM PRINT "REM FAILED THE TEST" 

30 REM * REM FAILED THE TEST IF LINE 20 IS PRINTED* 

40 PRINT "REM PASSED THE TEST" 

99 END 



SAMPLE RUN 



'REM' TEST PROGRAM 
REM PASSED THE TEST 



Some computers allow either the REM or REMARK statement, while others accept only 
one. 



VARIATIONS IN USAGE 

None known. 



ALSO SEE 

REMARK, '(apostrophe), ! 



219 




REMARK is used by some computers as an optional 
word for REM. Computers that use the REMARK state- 
ment may also accept its abbreviation (REM). 

For more information see REM. 



TEST PROGRAM 

10 PRINT "REMARK' TEST PROGRAM" Statement 

20 REMARK PRINT "REMARK FAILED THE TEST" 

30 REMARK * REMARK FAILED THE TEST IF LINE 20 IS PRINTED * 

40 PRINT "REMARK PASSED THE TEST" 

99 END 

SAMPLE RUN 

•REMARK' TEST PROGRAM 
REMARK PASSED THE TEST 

VARIATIONS IN USAGE 
None known. 

ALSO SEE 
REM, ' (Apostrophe) 
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RENUM is used in some computers (e.g. those using ver- 
sions of Microsoft BASIC) as an abbreviation for the 
RENUMBER command, which changes program line 
numbers. For more information see RENUMBER, 

RENUM nl,n2,n3 is used to renumber all program lines 
starting with the original line number n2. Line n2 is 
assigned line number nl and the following lines are incre- 
mented by the value of n3. 

Command 

TEST PROGRAM 

2 REM 'RENUM' TEST PROGRAM 

3 X=1 

4 PRINT "IF THE PROGRAM LINES M ; 

5 GOTO 10 

6 PRINT "THE RENUM COMMAND "; 

7 X=2 

8 GOTO 12 

10 PRINT "ARE RENUMBERED" 
12 ON X GOTO 6,14 
14 PRINT "PASSED THE TEST," 
16 END 



SAMPLE RUN 

Type the command renum i 00,5,50 and RUN. 

IF THE PROGRAM LINES ARE RENUMBERED 
THE RENUM COMMAND PASSED THE TEST, 

To verify that the program is RENUMbered, LIST the program. 

2 REM 'RENUM' TEST PROGRAM 

3 X=1 

4 PRINT "IF THE PROGRAM LINES "; 
100 GOTO 300 

150 PRINT "THE RENUM COMMMAND "; 

200 X=2 

250 GOTO 350 

300 PRINT "ARE RENUMBERED" 

350 ON X GOTO 150,400 

400 PRINT "PASSED THE TEST." 

450 END 
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If the original line number (n2) is omitted, the computer automatically renumbers each 
line from the first line to the last. In this case, the computer requires two commas 
between the values nl and n3 indicating n2 is omitted, (e.g. RENUM 100„50.) 

Some computers (e.g. DEC-10) use the word RESEQUENCE instead of RENUMber. 

VARIATIONS IN USAGE 
None known. 

ALSO SEE 

RENUMBER, GOTO, GOSUB, IF-THEN, ON-GOTO, ON-GOSUB, LIST 
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RENUMBER is used in some computers (e.g. the 
Cromemco 16K Extended BASIC) to change the program 
line numbers. The line numbers used in GOTO, GOSUB, 
IF-THEN, ON-GOTO and ON-GOSUB statements are 
changed accordingly to maintain the same branching 
scheme. 

If a number is not included in the RENUMBER state- 
ment, the computer automatically RENUMBERs each 
program line starting at line 10, and spacing the lines 10 
numbers apart. 




Command 



TEST PROGRAM 

2 REM 'RENUMBER' TEST PROGRAM 

3 X=1 

4 PRINT "IF EACH PROGRAM LINE "; 

5 GOTO T0 

6 PRINT "THE RENUMBER COMMAND '"; 

7 X=2 

8 GOTO 12 

10 PRINT "IS RENUMBERED" 
1 2 ON X GOTO 6,14 
14 PRINT "PASSED THE TEST." 
16 END 

RUN, to be sure it works. 

Type the command RENUMBER and RUN again. 

SAMPLE RUN 

IF EACH PROGRAM LINE IS RENUMBERED 
THE RENUMBER COMMAND PASSED THE TEST. 



To verify that the program is RENUMBERed, LIST the program. It should appear: 



10 REM 'RENUMBER* TEST PROGRAM 

20 X=1 

30 PRINT "IF EACH PROGRAM LINE "; 

40 GOTO 80 

50 PRINT "THE RENUMBER COMMAND "j 

60 X=2 

70 GOTO 90 
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80 PRINT "IS RENUMBERED" 
90 ON X GOTO 30,100 
100 PRINT "PASSED THE TEST." 
1 10 END 



RENUMBER n is used to renumber each program line starting with line number n and 
incrementing by 10. To test this feature on the TEST PROGRAM, type RENUMBER 
20 and LIST the program. It should read: 



20 REM 'RENUMBER 1 TEST PROGRAM 

3 X=l 

40 PRINT "IF EACH PROGRAM LINE "; 

50 GOTO 90 

60 PRINT "THE RENUMBER COMMAND "t 

7 X=2 

80 GOTO 100 

90 PRINT "IS RENUMBERED" 

1 00 ON X GOTO 6 0,1 1 

1 10 PRINT "PASSED THE TEST," 

120 END 



RENUMBER nl,n2 is used to renumber each program line starting with line number nl 
and incrementing by the value of n2. To test this feature on the TEST PROGRAM, type 
RENUMBER 50,20 and LIST the program. Now it should read: 



50 REM 'RENUMBER' TEST PROGRAM 

70 X=l 

90 PRINT "IF EACH PROGRAM LINE "; 

1 10 GOTO 190 

130 PRINT "THE RENUMBER COMMAND ' 

150 X=2 

170 GOTO 210 

190 PRINT "IS RENUMBERED" 

210 ON X GOTO 130,230 

230 PRINT "PASSED THE TEST." 

250 END 



RENUMBER nl,n2,n.3 is used to renumber each program line starting with the old line 
number n3. Line number n3 is assigned line number nl, and the remaining line numbers 
are incremented by the value n2. To test this feature on the last TEST PROGRAM, type 
RENUMBER 500,10,90 and LIST the program. Does it look like this? 



50 REM 'RENUMBER* TEST PROGRAM 

70 X=1 

500 PRINT "IF EACH PROGRAM LINE " 
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RENUMBER 



510 GOTO 550 

520 PRINT "THE RENUMBER COMMAND ' 

530 X = 2 

540 GOTO 560 

550 PRINT "IS RENUMBERED" 

560 ON X GOTO 520.570 

570 PRINT "PASSED THE TEST." 

580 END 



RENUMBER nl,n2,n3,n4 is used to renumber the old program lines from line n3 to line 
n4. Line n3 is assigned line number nl and those lines following (ending with line n4) are 
incremented by the value n2. To test this feature on the last TEST PROGRAM, type 
RENUMBER 60,5,70,510 and LIST the program. 



50 REM 'RENUMBER' TEST PROGRAM 

6 X=l 

65 PRINT "IF EACH PROGRAM LINE "; 

70 GOTO 550 

520 PRINT "THE RENUMBER COMMAND ' 

530 X = 2 

540 GOTO 560 

550 PRINT "IS RENUMBERED" 

560 ON X GOTO 520,570 

570 PRINT "PASSED THE TEST." 

580 END 



VARIATIONS IN USAGE 

None known. [RESEQUENCE is used by some computers (e.g. DEC -10) instead of 
RENUMBER.! 



ALSO SEE 

RENUM, REN, GOTO, GOSUB, IF-THEN, ON-GOTO, ON-GOSUB, LIST 
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RES is used in the PDP-8E as an abbreviation for the 
RESTORE statement. 

For more information see RESTORE. 



TEST PROGRAM 

10 REM 'RES' TEST PROGRAM 

20 FOR X^l TO 3 

30 READ A 

40 NEXT X 

50 RES 

60 READ A 

70 IF A*=l THEN 100 

80 PRINT "RES FAILED THE TEST" 

90 GOTO 999 

100 PRINT "RES PASSED THE TEST* 

1 10 DATA 1,2,3.4 

999 END 




Statement 



SAMPLE RUN 

RES PASSED THE TEST 

VARIATIONS IN USAGE 
None known. 

ALSO SEE 

RESTORE, REST., READ, DATA 
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The RESET statement is used by the TRS-80 Levels I and 
II as a special feature to "turn off a graphics block in a 
predetermined grid on the screen. 

The block to be "turned off within the grid is specified 
by the X,Y coordinates enclosed in parentheses following 
the RESET statement . For example , r eset ( 5 ,8 ) 
instructs the computer to turn off a graphics block 
located in the 5th column and the 8th row of the graphics 
grid. 

To turn on the graphics block, see SET. 
TEST PROGRAM 




Statement 



10 REM 'RESET* TEST PROGRAM 

20 CLS 

30 Y=l 

40 FOR X=l TO 100 

50 SET (X t Y) 

60 NEXT X 

70 PRINT 

80 PRINT "RESET PASSED THE TEST IF THE LINE DISAPPEARS 1 

90 FOR X=:1 TO 100 

100 RESET {X,Y} 

1 10 NEXT X 

999 END 

SAMPLE RUN 

RESET PASSED THE TEST IF THE LINE DISAPPEARS 

VARIATIONS IN USAGE 

None known. 

ALSO SEE 

SET, CLS 
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REST, is used in the TRS-80 Level I as an abbreviation for 
the RESTORE statement. 

For more information see RESTORE. 
TEST PROGRAM 

10 REM 'REST.' TEST PROGRAM 

20 FOR X=l TO 3 

30 READ A 

40 NEXT X 

50 REST. 

60 READ A 

70 iF fi.= 1 THEN t 00 

80 PRINT "REST. FAILED THE TEST" 

90 GOTO 999 

100 PRINT "REST, PASSED THE TEST" 

1 10 DATA 1,2,3.4 

999 END 




Statement 



SAMPLE RUN 

REST, PASSED THE TEST 

VARIATIONS IN USAGE 

None known. 

ALSO SEE 

RESTORE, RES, READ, DATA 
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Execution of a RESTORE statement causes the DATA 
pointer to be "reset" back to the first piece of data in the 
first DATA line. This enables the computer to use data 
stored in DATA statements more than once. 

TEST PROGRAM 

10 REM 'RESTORE' TEST PROGRAM 

20 READ x Statement 

30 IF X=3 THEN 50 

40 GOTO 20 

5-0 RESTORE 

60 READ X 

70 IF X=1 THEN 100 

80 PRINT "RESTORE FAILED THE TEST" 

90 GOTO 999 

100 PRINT "RESTORE PASSED THE TEST" 

1 10 DATA 1,2,3 

999 END 



SAMPLE RUN 

RESTORE PASSED THE TEST 

VARIATIONS IN USAGE 

Some interpreters will allow resetting only the DATA in a specific DATA line by adding 
that DATA statement line number after a RESTORE statement. See line 100 below. 

TEST PROGRAM 

10 REM 'RESTORE {LINE*}' TEST PROGRAM 

20 READ X 

30 PRINT X; 

40 IF X^3 THEN 60 

50 GOTO 20 

60 READ X 

70 PRINT X; 

80 IF X=6 THEN 1 00 

90 GOTO 60 

100 RESTORE 180 

1 10 READ X 

120 IF X=4 THEN 150 
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130 PRINT "RESTORE FAILED THE TEST" 

140 STOP 

150 PRINT "RESTORE PASSED THE TEST" 

160 GOTO 999 



1 80 DATA 4,5,6 
999 END 

SAMPLE RUN 

1 2 3 4 5 6 RESTORE PASSED THE TEST 

ALSO SEE 
DATA, READ 
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The RESUME statement is used as the last statement in 
ON-ERROR-GOTO routines, telling the computer to 
RESUME program execution at a specified line number. 
The computer does not allow execution of the RESUME 
statement if it is not preceded by an ON-ERROR-GOTO 
statement. See ON-ERROR-GOTO for a TEST PRO- 
GRAM using RESUME(line number). (Saves space not to 
duplicate it here.) 




Statement 



RESUME NEXT is used to branch to the line following 

the error and continues program execution. To test for RESUME NEXT capability in 

your computer, change line 1 10 in the ON-ERROR-GOTO test program to: 



1 10 RESUME NEXT 



SAMPLE RUN (ON-ERROR-GOTO test program using RESUME NEXT) (using 0) 



ENTER A NUMBER AND IT'S INVERSE WILL, BE COMPUTED? 
THE INVERSE OF CANNOT BE COMPUTED -TRY AGAIN 
THE INVERSE OF IS 



RESUME and RESUME (without a line number or NEXT) are used to branch to the 
statement containing the error. 

TEST PROGRAM 

10 REM 'RESUME' TEST PROGRAM 

20 ON ERROR GOTO 100 

30 PRINT "ENTER A POSITIVE NUMBER"; 

40 INPUT N 

50 A=LOG(N) 

60 PRINT "THE LOG OF";N;"IS";A 

70 GOTO 30 

100 PRINT "A NEGATIVE NUMBER IS NOT ALLOWED" 

1 1 N = N*~1 

1 20 RESUME 

999 END 
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RESUME 



SAMPLE RUN (using 4) 

ENTER A POSITIVE NUMBER? -4 

A NEGATIVE NUMBER IS NOT ALLOWED 

THE LOG OF 4 IS 1,38629 

ENTER A POSITIVE NUMBER? 

To test RESUME (without a line number or NEXT) capability in your computer, change 
line 120 in the above TEST PROGRAM to: 

120 RESUME 

and RUN. The SAMPLE RUN should not change. 

VARIATIONS IN USAGE 
None known. 

ALSO SEE 

ON ERROR-GOTO, ERL, ERR 
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RET is used in the PDP-8E as an abbreviation for the 
RETURN statement. 

For more information see RETURN. 



TEST PROGRAM 

10 REM 'RET (RETURN)' TEST PROGRAM 
20 PRINT "RET"; 

30 gosub t00 Statement 

40 PRINT "THE TEST/' 

50 GOTO 999 

100 PRINT " PASSED "j 

1 10 RET 

999 END 



SAMPLE RUN 

RET PASSED THE TEST. 

VARIATIONS IN USAGE 

None known. 



ALSO SEE 

RETURN, RET. 
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RET. is used in the TRS-80 Level I and other variations of 
Palo Alto Tiny BASIC as an abbreviation for the RE- 
TURN statement. 

For more information see RETURN. 
TEST PROGRAM 

10 REM 'RET. (RETURN)' TEST PROGRAM 

20 PRINT "RET."; 

30 GOSUB 100 

40 PRINT "THE TEST." 

50 GOTO 999 

100 PRINT " PASSED "; 

1 10 RET, 

999 END 




Statement 



SAMPLE RUN 

RET. PASSED THE TEST. 

VARIATIONS IN USAGE 
None known. 

ALSO SEE 

RETURN, RET, GOSUB 
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The RETURN statement is used in conjunction with the 
GOSUB statement. It is used as the last statement in a 
subroutine; it tells the computer to return to the line con- 
taining the GOSUB statement and continue program 
execution from that point. 

The computer will not allow execution of the RETURN 
statement if it was not preceded by a GOSUB statement. 

TEST PROGRAM 

10 REM 'RETURN' STATEMENT TEST PROGRAM 

20 GOSUB 50 

30 PRINT "WAS ACCEPTED." 

40 GOTO 99 

50 PRINT "THE RETURN STATEMENT "; 

60 RETURN 

70 PRINT "WAS NOT ACCEPTED." 

99 END 




Statement 



SAMPLE RUN 

THE RETURN STATEMENT WAS ACCEPTED. 

VARIATIONS IN USAGE 

None known. 

ALSO SEE 

GOSUB. ON-GOSUB and IF-GOSUB 
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The RIGHT(string,n) function is used in some computers 
(e.g. those using MAX BASIC) to isolate a specific num- 
ber (n) of string characters, starting from the right 
most character in the string. For example, print 
right("compusoft ,, ( 4) prints the letters SOFT, 
which are the right 4 characters in COMPUSOFT, which is 
a string. 

For more information see RIGHTS. 
TEST PROGRAM 

10 REM 'RIGHT' TEST PROGRAM 

20 A$="CONTEST" 

30 B$=RIGHT(AS,4) 

40 PRINT "THE 'RIGHT' FUNCTION PASSED THE ";B$ 

99 END 




Function 



SAMPLE RUN 

THE 'RIGHT* FUNCTION PASSED THE TEST 

VARIATIONS IN USAGE 
None known. 

ALSO SEE 

RIGHTS 
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The RIGHT$(string,n) function is used to isolate a specific 
number (n) of string characters, starting from the right- 
most character in the string. 

For example, print right$( m compusoft ,, ,4) prints 
the letters SOFT, which are the right 4 characters in 
COMPUSOFT, which is a string. 

The string must be enclosed in quotes or assigned to a 
string variable. The number (n) of characters can be 
expressed as a variable, number or arithmetic operation. 
A comma must separate the string from the number. 




Function 



If the value of (n) is a decimal, the computer automatically finds its integer value. 
TEST PROGRAM 

10 REM 'RIGHTS' TEST PROGRAM 

20 AS="CONTEST" 

30 B35=RIGHT$(AS,4) 

40 PRINT "THE "|RIGHT$("ALRIGHT",5)i"$ FUNCTION PASSED THE " ;B$ 

99 END 

SAMPLE RUN 

THE RIGHTS FUNCTION PASSED THE TEST 

VARIATIONS IN USAGE 

None known. 

ALSO SEE 

PRINT, LEFTS, MID$, CHR$, SPACES, STRS, STRINGS, INKEYS 
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RND is used to generate a random number greater than 
and less than 1 . 

TEST PROGRAM 

10 REM 'RND' TEST PROGRAM 
20 FOR X^l TO 8 
30 PRINT RND, 

Ad next x Function 

99 END 




SAMPLE RUN (Typical) 



,627633 ,358479 .137551 .127641 

.125054 .809923 .888076 ,787762 

RND(0) is used by many computers to specify the same operation as RND.. 
TEST PROGRAM 

10 REM 'RND(0)' TEST PROGRAM 
20 FOR X=1 TO 8 
30 PRINT RND{0), 
40 NEXT X 
99 END 

SAMPLE RUN (Typical) 

.862675 .735285 ,476059 ,55141 

,245708 .242171 .968336 .721014 

While RND(n) generates a random number, in some computers RND(0) repeats the last 
number generated by the random number generator. 

RND(n) is used by some computers to create a random number greater than and less 
than 1 when n is any number greater than zero, 

TEST PROGRAM 

10 REM "RND(0) AS A REPEAT' TEST PROGRAM 

20 PRINT "RND(1) M 

30 FOR X=1 TO 4 

40 PRINT RNDfl ). 

50 NEXT X 

60 PRINT ,, RND{0}" 

70 FOR Y = 1 TO 4 

80 PRINT RND(0}, 

90 NEXT Y 

99 END 
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RND " 

SAMPLE RUN (Typical) 

RND(1) 

.592453 .245804 ,118263 .961308 

RNQ(0) 

.961308 .961308 .961308 .961308 

A few computers create a random integer between 1 and the value of n when n is greater 
than 1 (e.g. TRS-80). 

RND(n) automatically integers the value of n. 
TEST PROGRAM 

10 REM 'RND' TEST PROGRAM 

20 N=10 

30 FOR X*M TO 4 

40 PRINT RND(N), 

50 NEXT X 

99 END 

SAMPLE RUN (Typical) 



Some computers reset the internal (seed) number and create a random number greater 
than and less than 1 when the n in RND(n) is negative. See RANDOM or RANDOMIZE 
for details. 

A TRICK 

If your computer is one that generates random numbers > and < 1 and you need a 
random integer number from to 9, then try this trick. 

PRINT INT{10*RND) 

A random number from 1 to 10 can be printed with this trick. 

PRINT INT(10*RND-M) 

ALSO SEE 

RAND, RANDOM, RANDOMIZE 
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RU is used by some computers (e.g. the T.I. 990) as an 
abbreviation for the RUN command. 

For more information see RUN. 



TEST PROGRAM 

10 REM 'RU (RUN)' TEST PROGRAM %3S^^ 

20 PRINT "THIS LINE COURTESY OF THE RU COMMAND." Command 

99 END 




SAMPLE RUN 

After entering the RU command, the computer should print 

THIS LINE COURTESY OF THE RU COMMAND. 

VARIATIONS IN USAGE 

None known. 

ALSO SEE 

RUN, R. 
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The RUN command instructs the computer to execute the 
program or programs held in memory, starting with the 
lowest line number. With many computers, a line number 
may be included after the RUN command to specify a 
starting line other than the first one (e.g. run 40). 

TEST PROGRAM 

10 REM 'RUN* TEST PROGRAM 

20 PRINT "THIS PRINTING STARTED AT LINE 20." 

30 GOTO 99 

40 PRINT "THIS PRINTING STARTED AT LINE 40." 

99 END 




Command 



SAMPLE RUN 

After entering the RUN Command, the computer should display: 



THIS PRINTING STARTED AT LINE 20. 

By adding the number 40 to the RUN command, RUN40 or RUN 40, the computer 
should start at line 40 and print the following message: 

THIS PRINTING STARTED AT LINE 40, 

The RUN command is used only at the monitor or command level and is never accepted 
in program statements. If you want to RUN a program using a program statement, see 
CHAIN. 

ALSO SEE 
R.,RU, CHAIN 
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S. is used in the TRS-80 Level I and other variations of 
Palo Alto Tiny BASIC as an abbreviation for the STEP 
statement and the graphics SET statement. Most versions 
of Palo Alto Tiny BASIC (but not the TRS-80 Level I) 
use S. to abbreviate the STOP statement and SIZE com- 
mand. 

S. is recognized as STEP when preceeded by the NEXT 
statement, and as SET when followed by two values en- 
closed in parenthesis and separated by a comma [e.g. 
S.(X,Y)] . S. replaces STOP when it is used alone as a 
statement, and as SIZE when used as a command. 




Command 

Function 

Statement 



The following program uses S. as the STEP statement. For 
more information see STEP. 

TEST PROGRAM 

10 REM 'S. (STEP)' TEST PROGRAM 

20 FOR X=1 TO 10 5,2 

30 PRINT X; 

40 NEXT X 

50 PRINT "'S.' PASSED THE TEST" 

99 END 



SAMPLE RUN 

13 5 7 9 'S.' PASSED THE TEST 

The next program uses S. as the graphics SET statement . For more information see SET. 
TEST PROGRAM 

10 REM 'S, (SET)' TEST PROGRAM 

20 PRINT • ,, S/ PASSES THE TEST IF A HORIZONTAL. LINE APPEARS." 

30 FOR X=0 TO 127 

40 S.= (X,21) 

50 NEXT X 

99 END 



SAMPLE RUN 



•S.' PASSES THE TEST IF A HORIZONTAL. ONE APPEARS. 



The next program uses S. as a STOP command. For more information see STOP. 
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= s. = 

TEST PROGRAM 



10 REM *S„ {STOP) 1 TEST PROGRAM 

20 PRINT "THE S. STATEMENT IN ACTION" 

30 S. 

40 PRINT "THE S. STATEMENT FAIL.ED THE TEST" 

99 END 

SAMPLE RUN 

THE S. STATEMENT IN ACTION 
BREAK AT LINE 30 

This next program uses S. as a SIZE function. 
TEST PROGRAM 

10 REM 'S. (SIZE)' TEST PROGRAM 

20 PRINT "THIS PROGRAM SIZE CAN BE CHECKED WITH THE S. COMMAND" 

99 END 

SAMPLE RUN 

Type the command PRINT S. and the computer should print the number of bytes of 
memory occupied by this TEST PROGRAM. 

VARIATIONS IN USAGE 

None known. 

ALSO SEE 

STEP, SET, STOP, STO, ST. 
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SAVE is used in a few computers (e.g. the APPLE II 
BASIC and the Commodore PET) to record programs 
from computer memory to cassette tape. 

For more information see CSAVE. 



TEST PROGRAM 

10 REM 'SAVE' TEST PROGRAM 

20 PRINT "THIS PROGRAM TESTS THE SAVE FEATURE" 

99 END 




Command 



Set up the cassette recorder for recording and type the command SAVE. The computer 
should control the operation of the cassette recorder by turning the motor on and off (at 
the beginning and end of the record cycle). 

Once the program is recorded on cassette tape, type "NEW" (or whatever is required) to 
erase the program from memory. Load the program from tape back into the computer 
(see LOAD). List the program to verify that the program held in the computer's memory 
is identical to that originally entered (see LIST). 

SAMPLE RUN 

THIS PROGRAM TESTS THE SAVE FEATURE 



VARIATIONS IN USAGE 

Some computers with disc storage capability use SAVE to copy programs in computer 
memory to disc memory. 

ALSO SEE 

LOAD, CSAVE, CLOAD, LIST 
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The SET statement is used as a special feature by the 
TRS-80 Level I and II BASICs to "turn on" or "light up" 
a graphics block in a predetermined grid on the screen. 

The block to be lit, within the grid, is specified by the 
X,Y coordinates enclosed in parentheses following the 
SET statement For example, set (5,8) instructs the 
computer to SET a graphics block located in the 5th 
column and the 8th row of the graphics grid. 

To turn off the graphics block, see RESET. 




Statement 



TEST PROGRAM 

10 REM 'SET' TEST PROGRAM 

20 PRINT "ENTER X COORDINATE"; 

30 INPUT X 

40 PRINT "ENTER Y COORDINATE" 

50 INPUT Y 

60 SET(X.Y) 

70 PRINT "SET PASSED THE TEST" 

80 PRINT "IF A LIGHT APPEARED AT (X,Y) COORDINATE ( " ;X;*V;Y;" ) . 

99 END 



SAMPLE RUN (Using 65 and 



ENTER X COORDINATE? 65 

ENTER Y COORDINATE? 40 

SET PASSED THE TEST 

IF A LIGHT APPEARED AT (X,Y) COORDINATE ( 65, 40 ). 

VARIATIONS IN USAGE 
None known. 

ALSO SEE 

RESET 
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SCRN is used by the APPLE II BASIC as a special feature 
to indicate the color of a graphics block on the screen. 
The computer has the capability of displaying 16 colors 
(numbered from to 1 5). For a complete color listing, see 
COLOR. 

The graphics block is specified by the X,Y coordinates 
enclosed in parentheses following SCRN. The X value 
represents the column number and the Y value repre- 
sents the row number. These values may range from to 
39. 




Function 



TEST PROGRAM 

10 REM 'SCRN' TEST PROGRAM 

20 GR 

30 COLOR = 1 1 

40 PLOT 20,10 

50 IF SCRN (20,10)^1 1 THEN 80 

60 PRINT "THE SCREN FUNCTION FAILED THE TEST" 

70 GOTO 99 

80 PRINT "THE SCRN FUNCTION PASSED THE TEST" 

99 END 

SAMPLE RUN 

THE SCRN FUNCTION PASSED THE TEST 

VARIATIONS IN USAGE 

None known. 

ALSO SEE 

COLOR, PLOT, GR, POINT 
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The SIN(A) function computes the Sine of the angle A, 
when that angle is expressed in Radians, (not in degrees!). 
One radian = approximately 57 degrees. 



Y 





Function 



Sine (SIN) is defined as the ratio of the length of the side opposite the angle in question 
to the length of the hypotenuse. This formula applies only to right triangles: sin(a) = y/h 

The opposite of SIN is ARCSIN. ARCSIN finds the value of the angle when its SIN, or 
ratio of sides (Y/H), is known. 

TEST PROGRAM 

10 REM 'SINE 1 TEST PROGRAM 

20 PRINT "ENTER AN ANGLE (EXPRESSED IN RADIANS)' 1 ; 

30 INPUT R 

40 Y==SIN{R) 

50 PRINT "THE SINE OF A" ;R {" R ADI AN ANGLE 1S";Y 

30999 END 

SAMPLE RUN ( using 1) 

ENTER AN ANGLE {EXPRESSED IN RADIANS)? 1 
THE SINE OF A 1 RADIAN ANGLE IS .841471 

To convert angles from degrees to radians, multiply the angle in degrees times .0174533. 

For example, r=sin(a*. 0174533) 

To convert angles from radians to degrees, multiply radians times 57.29578. 

IF YOUR COMPUTER DOES NOT HA VE IT 

If your interpreter does not have the SINe capability, the following subroutine can be 
substituted. 

30000 GOTO 30999 

30370 REM * SINE SUBROUTINE * INPUT X IN RADIANS, OUTPUT Y 

30372 REM ALSO USES Z INTERNALLY 

30374 X™X*57„29578 
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SIN 



30376 Z=ABS(X)/X 

30378 X=Z*X 

30380 IF X>=360 THEN 30388 

30382 IF X>90 THEN 30394 

30384 X=X/57. 29578 

30385 IF ABS(X)<2.48616E-4 THEN 30437 

30386 GOTO 30420 
30388 X=X/360 

30390 X={X-INT(X)}*360 

30392 GOTO 30382 

30394 X=X/90 

30396 Y = INT(X) 

30398 X={X-Y}*90 

30400 ON Y GOTO 30402,30406,30410 

30402 X=90-X 

30404 GOTO 30384 

30406 X--X 

30408 GOTO 30384 

30410 X=X-90 

30415 GOTO 30384 

30420 Y = X~X*X*X/6+X*X*X*X*X/l 20-X*X*X*X*X*X*X/5040 

3 04 25 Y = Y4-X*X*X*X*X*X*X*X*X/3 6 28 8 

30430 IF Z=-1 THEN 30440 

30435 GOTO 30445 

30437 Y=0 

30438 GOTO 30445 
30440 Y=~~~Y 
30445 RETURN 

To use this subroutine with the TEST PROGRAM to find the SINE of an angle 
(expressed in Radians), make the following TEST PROGRAM changes: 

35 X=R 

40 GOSU8 30370 

To find the SINE of an angle (expressed in Degrees) either delete line 30372 or change 
line 40 to: 

40 GOSUB 30376 

VARIATIONS IN USAGE 

Some (rare) interpreters convert everything to degrees automatically. 

ALSO SEE 

TAN, COS, ATN 
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SLEEP is used by the HARRIS BASIC-V to suspend pro- 
gram execution for a specified number of tenths of 
seconds. 

For example, sleep 300 causes the computer to pause 
30 seconds before continuing program execution. 



TEST PROGRAM 

10 REM 'SLEEP' TEST PROGRAM 

20 PRINT "THE COMPUTER SHOULD PRINT THE FOLLOWING LINE' 

30 SLEEP 150 

40 PRINT "AFTER SLEEPING 15 SECONDS" 

99 END 




Statement 



SAMPLE RUN 

THE COMPUTER SHOULD PRINT THE FOLLOWING LINE 

(15 second pause) 

AFTER SLEEPING IS SECONDS 



IF YOUR COMPUTER DOESN'T HA VE IT 

Insert a FOR-NEXT loop to "burn up" computer time. Test your computer to see how 
many loops it executes per second. A micro-computer may perform as few as several 
hundred, while a big mainframe may execute 50,000 or more. Replace line 30 in the 
TEST PROGRAM (assuming your computer executes 1000 loops per second) with: 



30 FOR L=l TO 15000 
3 5 NEXT L 

VARIATIONS IN USAGE 

None known. 

ALSO SEE 

WAIT 
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The SPA(n) function is used in the Hewlett-Packard 2000 
BASIC to insert a specified number (n) of spaces (blank 
positions). 

For example, print spa(i0); ,, hello" prints 10 
spaces followed by the word HELLO. 

TEST PROGRAM 



M 







Function 



10 REM 'SPACE' TEST PROGRAM 

20 PRINT "IF THE FOLLOWING LINE CONTAINS 10 LEADING SPACES" 

30 PRINT SPA(10};"THE SPA FUNCTION PASSED THE TEST" 

99 END 

SAMPLE RUN 

IF THE FOLLOWING LINE CONTAINS 1 LEADING SPACES 
THE SPA FUNCTION PASSED THE TEST 

IF YOUR COMPUTER DOESN'T HA VE IT 

In most cases, SPAces can be inserted by careful use of the TAB function. 

For example, 30 print tab(i0);"the spa function passed the: test" will 
accomplish the same thing, and a variable could have been used instead of the number 
10. 

Where a variable isn't needed, simple enclosure of spaces between quotes will also work. 

For example, 30 print " the spa function passed the test" 

VARIATIONS IN USAGE 
None known. 

ALSO SEE 

SPACE, SPACES, SPC, TAB 
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The SPACE(n) function is used in a few computers (e.g. 
those using MAX BASIC) to print a specified number (n) 
of spaces (blank positions). 

For example, print space(i0);"hel.lo" prints 10 
spaces followed by the word HELLO. 

TEST PROGRAM 




Function 



10 REM "SPACE* TEST PROGRAM 

20 PRINT "IF THE FOLLOWING LINE CONTAINS 10 LEADING SPACES" 

30 PRINT SPACE(10);"THE SPACE FUNCTION PASSED THE TEST" 

99 END 

SAMPLE RUN 

IF THE FOLLOWING LINE CONTAINS 10 LEADING SPACES 
THE SPACE FUNCTION PASSED THE TEST 

IF YOUR COMPUTER DOESN'T HA VE IT 

In most cases, SPACEs can be inserted by careful use of the TAB function. 

For example, 30 print tab(i0);"the space function passed the test*- will 
accomplish the same thing, and a variable could have been used instead of the number 10. 

Where a variable isn't needed, simple enclosure of spaces between quotes will also work. 

For example, 30 print " the space function passed the test" 

VARIATIONS IN USAGE 

Some computers require a $ sign following the SPACE function. 

ALSO SEE 

SPACES, SPA, SPC, TAB 
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The SPACE$(n) function is used to insert a specified num- 
ber (n) of spaces. 

For example, print space$(20);"hello" prints 20 
spaces followed by the word HELLO. 

Most computers with SPACE$(n) capability require the 
value (n) to be greater than and less than 256. 

TEST PROGRAM 




Function 



10 REM 'SPACES' TEST PROGRAM 

20 AS=SPACE$(10) 

30 PRINT "IF THE FOLLOWING LINE CONTAINS 10 LEADING SPACES'* 

40 PRINT AS;'"THE SPACES FUNCTION PASSED THE TEST" 

99 END 

SAMPLE RUN 

IF THE FOLLOWING LINE CONTAINS 10 LEADING SPACES 
THE SPACES FUNCTION PASSED THE TEST" 

IF YOUR COMPUTER DOESN'T HA VE IT 

In most cases, SPACEs can be inserted by careful use of the TAB function. 

For example, 30 print tab(i 0);'*the spaces function passed the test" will 
accomplish the same thing, and a variable could have been used instead of the number 10. 

Where a variable isn't needed, simple enclosure of spaces between quotes will also work. 

For example, 30 print " the spaces function passed the test m 

VARIATIONS IN USAGE 
None known. 

ALSO SEE 
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The SPC(n) function is used to insert a specified number 
(n) of spaces (blank positions). 

For example, print spc(i0);"hello" prints 10 spaces 
followed by the word HELLO. 



TEST PROGRAM 

Function 

10 REM 'SPC TEST PROGRAM 

20 PRINT "IF THE FOLLOWING LINE CONTAINS 10 LEADING SPACES" 

30 PRINT SPC(10);"THE SPC FUNCTION PASSED THE TEST" 

99 END 

SAMPLE RUN 

IF THE FOLLOWING LINE CONTAINS 10 LEADING SPACES 
THE SPC FUNCTION PASSED THE TEST 

IF YOUR COMPUTER DOESN'T HAVE IT 

In most cases, SPACEs can be inserted by careful use of the TAB function. 

For example, 30 print tab(i0};"the spc function passed the test*' will 
accomplish the same thing, and a variable could have been used instead of the number 10. 

Where a variable isn't needed, simple enclosure of spaces between quotes will also work. 

For example, 30 print " the spc function passed the test* 1 

VARIATIONS IN USAGE 

None known . 

ALSO SEE 

SPACE, SPACES, SPA, TAB 
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The SQR(n) function returns the square root of any posi- 
tive number ( Vfl). 

TEST PROGRAM 

10 REM 'SQR' TEST PROGRAM 

20 PRINT "THE SQUARE ROOT OF 225 iS"; 

30 PRINT SQR{225) 

40 PRINT *"SQR' PASSED THE TEST IF THE RESULT IS 15' 

30999 END 




Function 



SAMPLE RUN 

THE SQUARE ROOT OF 225 IS 15 

'SQR' PASSED THE TEST IF THE RESULT IS 15 

IF YOUR COMPUTER DOESN'T HA VE IT 

If the computer failed the Test Program substitute the following subroutine: 

30000 GOTO 30999 

30010 REM * SQUARE ROOT SUBROUTINE * INPUT X, OUTPUT Y 

30020 REM USES W AND Z INTERNALLY 

30025 IF X=0 THEN 30085 

30030 IFX>0 THEN 30045 

30035 PRINT "ROOT OF NEGATIVE NUMBER?" 

30040 STOP 

30045 Y=X/4 

30050 Z*=0 

30055 W=tX/Y™Y)/2 

30060 IF W = THEN 30090 

30065 IF W=sZ THEN 30090 

30070 Y = Y+W 

30075 Z=W 

30080 GOTO 30055 

30085 Y=0 

30090 RETURN 

To use this subroutine in the TEST PROGRAM, make these Test Program changes: 

25 X=225 

30 GOSUB 30010 

35 PRINT Y 

50 GOTO 30999 
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r= SQR 



VARIATIONS IN USAGE 

None known. 

ALSO SEE 

SQRT 
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The SQRT(n) function computes the square root of any 
positive number (x/T). 

TEST PROGRAM 

10 REM 'SORT' TEST PROGRAM 

20 PRINT "THE SQUARE ROOT OF 225 IS"; 

30 PRINTSQRT(225) 

40 PRINT "'SORT' PASSED THE TEST IF THE RESULT IS 15" FUHCtiOn 

30999 END 




SAMPLE RUN 

THE SQUARE ROOT OF 225 IS 15 

'SQRT' PASSED THE TEST IF THE RESULT IS 15 

If your computer failed the TEST PROGRAM, try the TEST PROGRAM in SQR. If it 
fails, substitute the subroutine found under SQR. 

To use the SQR subroutine in the TEST PROGRAM, make these TEST PROGRAM 

changes: 

25 X=225 

30 GOSUB 30010 

35 PRINT Y 



VARIATIONS IN USAGE 
None known. 

ALSO SEE 

SQR 



256 



ST is used by some computers (e.g. the TI 990) as an 
abbreviation for the STEP statement. 

For more information see STEP. 



TEST PROGRAM 

10 REM 'ST (STEP)' TEST PROGRAM 

20 FOR X=t TO 1 ST 2 

30 PRINT X; 

40 NEXT X 

50 PRINT '■'ST* PASSED THE TEST" 

99 END 




Function 



SAMPLE RUN 

13 5 7 9 'ST' PASSED THE TEST 

VARIATIONS IN USAGE 

None known. 

ALSO SEE 

STEP, STE, S. 
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ST. is used in the TRS-80 Level I as an abbreviation for 
the STOP statement. 

For more information see STOP. 
TEST PROGRAM 




10 REM 'ST, (STOP)' TEST PROGRAM 

20 PRINT "THE PROGRAM SHOULD 'STOP' AFTER THIS LINE" Statement 

30 ST. 

40 PRINT "'ST.' FAILED THE TEST IF THIS LINE IS PRINTED" 

99 END 



SAMPLE RUN 

THE PROGRAM SHOULD 'STOP' AFTER THIS LINE 
BREAK AT 30 

VARIATIONS IN USAGE 
None known. 

ALSO SEE 

STOP, STO, S., END, CONT 
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STE is used in the PDP-8E as an abbreviation for the OS^SIISSSs 

STEP statement . |^^^^^^^ 

For more information see STEP. i^^^^^^^^S 

TEST PROGRAM ^^^^^^ 

10 REM 'STE' TEST PROGRAM v d— !": ' i nT'l M fe! 

20 FOR X=1 TO 1 STE 2 FunCtiOII 

30 PRINT X; 

40 NEXT X 

50 PRINT "'STE' PASSED THE TEST" 

99 END 



SAMPLE RUN 



t 3 5 7 9 'STE* PASSED THE TEST 

VARIATIONS IN USAGE 

None known. 

ALSO SEE 

STEP, S., ST 
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The STEP function is used to specify the size of the step 
incremented in a FOR-NEXT statement. The STEP value 
can be positive, negative or sometimes even a non-integer 
decimal value. When a STEP value is not specified, the 
value of + 1 is automatically assumed. 

TEST PROGRAM #1 

10 REM 'STEP' TEST PROGRAM 

20 PRINT "WHEN THE STEP VALUE IS 2, X="; 

30 FOR X=1 TO 10 STEP 2 

40 PRINT X; 

50 NEXT X 

99 END 




Function 



SAMPLE RUN 

WHEN THE STEP VALUE IS 2,X= 1 3 5 7 9 

The following program tests the interpreter's ability to handle negative STEP values. 
TEST PROGRAM #2 

10 REM 'NEGATIVE STEP' TEST PROGRAM 

20 PRINT "WHEN THE STEP VALUE IS ~~2, X-"; 

3 FOR X=sl0 TO 1 STEP -2 

40 PRINT X; 

50 NEXT X 

99 END 



SAMPLE RUN 

WHEN THE STEP VALUE IS -2, X= 1 8 6 4 2 

Test program #3 checks the interpreter's ability to handle non-integer decimal STEP 
values. 



TEST PROGRAM #3 

10 REM 'NON-INTEGER STEP' TEST PROGRAM 
20 PRINT "WHEN THE STEP VALUE IS ,5, X="; 
30 FOR X=1 TO 5 STEP .5 
40 PRINT X; 
50 NEXT X 
99 END 
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STEP 



SAMPLE RUN 

WHEN THE STEP VALUE IS .5, X= 1 1.5 2 2.5 3 3.5 4 4.5 S 

A variable is accepted as the STEP value by some interpreters. For example, for x=i 
to 30 step a causes the value of X to be incremented by the value of variable A each 
time the corresponding NEXT statement is executed. 

TEST PROGRAM #4 

10 REM 'VARIABLE STEP' TEST PROGRAM 

20 PRINT "ENTER A STEP VALUE {BETWEEN 1 AND 10)" 

30 INPUT S 

40 PRINT "THE VALUE OF X="; 

50 FOR X=1 TO 1 STEP S 

60 PRINT X; 

70 NEXT X 

99 END 

SAMPLE RUN (Using 3) 

ENTER A STEP VALUE {BETWEEN 1 AND 10} 

? 3 

THE VALUE OF X= 1 4 7 10 

IF YOUR COMPUTER DOESN'T HAVE IT 

If STEP is not intrinsic, or not powerful enough, it can be easily simulated in ascending 
FOR-NEXT statements. Omit 'STEP S' from line 50 in the last test program, and add the 
following lines: 

6 5 X=X+S-1 

67 IF X<0 THEN 99 

Inserting these lines immediately before the corresponding NEXT statement allows incre- 
menting X by any integer or decimal fraction you wish. 

ALSO SEE 
FOR-NEXT,S,, ST,STE 
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STO is used in the Tektronix 4051 and PDP-8E as an 
abbreviation for the STOP statement. 

For more information see STOP. 



TEST PROGRAM 




Statement 



t0 REM 'STO (STOP}' TEST PROGRAM 

20 PRINT "THE PROGRAM SHOULD 'STOP* AFTER PRINTING THIS LINE" 

30 STO 

40 PRINT "'STO' FAILED THE TEST IF THIS LINE IS PRINTED" 

99 END 



SAMPLE RUN 

THE PROGRAM SHOULD 'STOP* AFTER PRINTING THIS LINE 

VARIATIONS IN USAGE 
None known. 

ALSO SEE 

STOP, END, CONT 
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The STOP statement is used to STOP execution of the 
program and place the computer in the monitor or imme- 
diate mode. It can be placed at any point within a pro- 
gram, but is not usually used in place of the END state- 
ment. 

Some computers will stop the program at the line which 
contains the STOP statement, while others jump to the 
line containing the END statement. 




Statement 



Many computers with interpreters (but not compilers) 
print the line number where the program stopped, and 
allow continuation of program execution via the CONTINUE command (see CONT). 

TEST PROGRAM 

10 REM 'STOP' TEST PROGRAM 

20 PRINT "SEE THE STOP STATEM ENT iN ACTION" 

30 STOP 

40 PRINT "THE STOP STATEMENT FAILED THE TEST" 

99 END 

SAMPLE RUN 

SEE THE STOP STATEMENT IN ACTION 
BREAK AT LINE 30 



VARIATIONS IN USAGE 

Trying to both STOP and END in the same program can be unusually frustrating unless 
you know your machine's capabilities. Some machines (e.g. Varian) require physical 
intervention (push a button) before RUNning, after hitting a program STOP. 

Others (mostly large machines) allow an unlimited number of STOP'S, but no END. 
Others allow an unlimited number of END's, but no STOP's. Most micros allow mixing of 
STOP'S and END's. 

With care, the STOP/END problem can almost always be resolved and programs can be 
converted quite easily. 

ALSO SEE 
S.,ST.,STO,CONT,END 
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The STR$(n) function is used to convert a numeric value 
(n) into a string. The value (n) may be expressed as a 
number or a numeric variable. 

For example, 

10 AS - STR&{35) 
20 PRINT AS 

prints the number 35 as a string. The computer auto- 
matically inserts a space before the number to allow for 
the sign (— ). 




Function 



Conversion of a number to a string via the STR$ function allows its manipulation using 
string modifiers (e.g. LEFTS, RIGHTS, MIDS, ASC, etc.). 

TEST PROGRAM 

10 REM 'STR$' TEST PROGRAM 

20 A = 123456 

30 A$ = STRS(A) 

40 PRINT "IF THE NUMBER";A;"1S CONVERTED TO THE STRING":AS 

50 PRINT "THEN THE STR$ FUNCTION PASSED THE TEST," 

99 END 

SAMPLE RUN 

IF THE NUMBER 123456 IS CONVERTED TO THE STRING 123456 
THEN THE STRS FUNCTION PASSED THE TEST, 

VARIATIONS IN USAGE 
None known, 

ALSO SEE 

ASC, CHRS, LEN, LEFTS, MIDS, RIGHTS, STRINGS, VAL 
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The STRING$(n ,ASCII code) function is used with the 
PRINT statement to print an ASCII character (n) number 
of times. 

For example, print string$(i0,65) prints the ASCII 
character A (ASCII code 65) ten times. 

TEST PROGRAM 

10 REM 'STRINGS' TEST PROGRAM 

20 PRINT STR1NG$(23,A2); 

30 PRINT "STRINGS FUNCTION ■'; 

40 PRINT STRINGS(23,42) 

99 END 




Function 



SAMPLE RUN 



******** 



********** STRINGS FUNCTION** 



VARIATIONS IN USAGE 

Some computers (e.g. the TRS-80 Level II) allow string characters (enclosed in quotes) or 
string variables in the STRINGS function. 

For example, 10 print string$(i0,"a") 

prints the letter A ten times. 



10 A$="B" 

20 PRINT STRINGS(5,AS) 

prints the letter B five times. 
TEST PROGRAM 

10 REM 'STRINGS' TEST PROGRAM 

20 PRINT "ENTER ANY LETTER, NUMBER OR SYMBOL.' 

30 INPUT AS 

40 PRINT STR1NGS(20, ,, . ,, ); 

50 PRINT STRINGS(20, AS) 

99 END 
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STRINGS 

SAMPLE RUN 



ENTER ANY LETTER, NUMBER OR SYMBOL? X 
XXXXXXXXXXXXXXXXXXXX 



IF YOUR COMPUTER DOES NOT HAVE IT 

If your computer does not accept the STRINGS function, it can be simulated by finding 
the ASCII character in the ASCII table (see Appendix A) which matches the ASCII 
code listed in the STRINGS function. Then place that character in a PRINT statement 
the number of times specified by the first number in the STRINGS function. 

For example: 

10 PRINT STRINGS) 12,45) 

can be entered as: 



10 PRINT " 



ALSO SEE 

PRINT, ASC, CHRS, LEN, MID$, LEFTS, RIGHTS, STRS, VAL 



STUFF is used in the Digital Group Opus 1 and Opus 2 
BASIC to insert integer values between and 255 into 
specified memory locations. 

For example, stuff 3000,65 places the decimal value 65 
in memory address 3000. 

The FETCH function can be used with STUFF to check 
what STUFF has stored into memory. (Some computers 
use PEEK or EXAM instead.) 




Statement 



Computers vary in the amount of available memory and memory addresses that can be 
STUFFed without erasing memory dedicated to other purposes. Check your computer's 
manual before running this TEST PROGRAM to determine that addresses 15001 to 
15010 are non-critical memory locations. If they are not, select 10 other consecutive 
addresses. 

TEST PROGRAM 

10 REM 'STUFF' TEST PROGRAM 

20 FOR X=! TO 10 

30 STUFF 15000+X.X 

40 NEXT X 

50 FOR X^15001 TO 15010 

60 Y=FETCH(X) 

70 PRINT Y; 

8 NEXT X 

90 PRINT 

100 PRINT "'STUFF' PASSED THE TEST IF #1 THRU #10 ARE PRINTED" 

999 END 

SAMPLE RUN 

12345678910 

•STUFF- PASSED THE TEST IF #1 THRU #10 ARE PRINTED 

IF YOUR COMPUTER DOESN'T HA VE IT 

If your computer failed the TEST PROGRAM, try the Test Programs found in POKE and 
FILL. 

VARIATIONS IN USAGE 

None known. 



ALSO SEE 

POKE, FILL, PEEK, FETCH, EXAM 
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SYS is used by a few computers (e.g. the Commodore 
PET and the Sperry Univac System/9 BASIC) as an abbre- 
viation for the SYSTEM command. 

For more information see SYSTEM. 

To test the computer's SYS capability, type the com- 
mand SYS. The computer accepted the SYS command if 
the computer changed to the monitor mode and prints 
an asterisk followed by a question mark (*?), (or some 
other appropriate monitor response). 




Command 



This feature can be activated on some terminals by pressing the escape (ESC) key. 
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The SYSTEM command is used in some computers to 
allow machine language data (object file) to be loaded 
from cassette tape or disc into the computer. These com- 
puters may also use SYSTEM as a program statement. 

When the computer executes the line containing the SYS- 
TEM statement, or when SYSTEM is typed on the termi- 
nal, the computer changes to the monitor mode and prints 
an asterisk followed by a question mark (*?) or some 
other cryptic symbol. This signal indicates the computer 
is ready to accept the object file from disc or tape. 




Command 
Statement 



Place an object file tape in the cassette player and set it to the PLAY mode. Type the ob- 
ject file name and RETURN. The cassette recorder's motor is controlled by the com- 
puter, which turns it on and off before and after the load cycle. The cassette should "play 
back" the data into the computer. When the data is loaded in the computer, another *? 
is displayed. 

To execute the object file routine, type a slash (/) followed by a memory decimal start- 
ing address. If the / is entered without the starting address, then execution begins at the 
address specified in the object file. 

The TRS-80 Level I-to-Level II CONVersion cassette tape is a typical example of how 
SYSTEM is used, 

VARIATIONS IN USAGE 

Some computers use the SYSTEM command similar to the ESC (escape) key on many 
keyboards to place the computer in the System, Executive or monitor mode. 



ALSO SEE 
SYS, PEEK, POKE 
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T. is used in the TRS-80 Level I BASIC as an abbreviation 
for the TAB function and the THEN statement. 

The computer's interpreter recognizes T. as a TAB func- 
tion when it is followed by a number enclosed in paren- 
theses [e.g. T.(20)] . It is recognized as a THEN statement 
when not followed by a number enclosed in parentheses 
and the computer has previously executed the IF state- 
ment (e.g. IF X=20 T.100). 

The first test program uses T. as the function TAB, For 
more information see TAB. 

TEST PROGRAM 




Function 
Statement 



10 REM «T. (TAB)' TEST PROGRAM 

20 PRINT T.{15);" , T.' PASSED THE TAB FUNCTION TEST" 

99 END 



SAMPLE RUN 



•T.' PASSED THE TAB FUNCTION TEST' 



This next test program uses T. as a THEN statement. For more information see THEN or 
IF-THEN. 



TEST PROGRAM 

10 REM 'T. (THEN)' TEST PROGRAM 

20 X=10 

30 IF X=10 T.60 

40 PRINT "'T. FAILED THE TEST" 

50 GOTO 99 

60 PRINT "'T.' PASSED THE TEST" 

99 END 

SAMPLE RUN 

'T.* PASSED THE TEST 

VARIATIONS IN USAGE 
None other known. 

ALSO SEE 

TAB, THEN, IF-THEN, THE, IF-THE, IF-T. 
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The TAB function is used with PRINT statements in a 
manner similar to the TAB key on a typewriter. When the 
PRINT statement is followed by TAB() the computer 
inserts a number of spaces (enclosed in parenthesis) before 
the statement to be printed. The TAB value must always 
be positive and should be less than the number of spaces 
allowed per line. 

If more than one TAB statement is used in one line, the 
numerical values must get progressively larger and allow 
room inbetween for that which is to be printed. If insuf- 
ficient room is allowed between TABs, they will be over- 
run, just like on a typewriter. 




Function 



The value may be expressed as a number, print tab(s); a variable, print TAB(x);or 
an expression, print tab(2X+y). TAB( ) must be followed by a semicolon or comma, 
depending upon the interpreter. 

TEST PROGRAM 

10 REM 'TAB' FUNCTION TEST PROGRAM 

20 PRINT TAB(S); "TAB 5" 

30 X - 1 

40 PRINT TAB(X); "TAB 10" 

50 PRINT TAB(6*X/5-f8); "TAB 20" 

999 END 



SAMPLE RUN 



TAB 20 



The maximum value of the TAB on your computer can be quickly determined by adding 
the following lines to the test program: 

60 PRINT "TYPE IN A TAB VALUE"; 

70 INPUT T 

80 PRINT TAB(T); "TAB"jT 

90 GOTO 60 

The TAB value entered in line 70 will cause line 80 to print the TAB value following the 
same number of spaces. 

VARIATIONS IN USAGE 

None known. 
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TAB =^=— =^^= 

IF YOUR COMPUTER DOESN'T HA VE IT 

There is no totally satisfactory replacement for TAB, but there are several ways to obtain 
printouts which may be acceptable. Assume an original PRINT series: 

200 PRINT TABt^irTHE'^TAB^h'-QUICK'TTAB^);" BROWN"; 
2! PRINT TAB {40};" POX" 

The TAB values are simple numbers and could be replaced by: 

200 PRINT '■ THE QUICK BROWN FOX" 

or, less accurately: 

200 PRINT "THE'V'QUICK'V'BROWN'V'FOX" 

or 
A combination of inserting spaces and automatic zone spacing. 

A third, and generally less satisfactory, method of arriving at a usable printout involves 
combining the carriage return suppressing ability of the semicolon (;), the automatic zon- 
ing of the comma (,), and inserted spaces. In some interpreters (compilers) however this 
can create a remarkably messy situation. 

ALSO SEE 

PRINT, PRINT AT, .(comma), ;(semicolon) 
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The TAN(A) function computes the Tangent of the 
angle A when that angle is expressed in radians (not 
in degrees!). One radian = approximately 57 degrees. 



Y 





Function 



Tangent (TAN) is defined as the ratio of the length of the side opposite the angle being 
investigated to the length of the side adjacent to it. 

TAN[A) = Y/X 

The opposite of TAN is ARCTAN (ATN). ARCTAN finds the value of the angle when its 
TAN, or ratio of sides (Y/X) is known. 

TEST PROGRAM 

10 REM 'TAN' TEST PROGRAM 

20 PRINT "ENTER AN ANGLE (EXPRESSED IN RADIANS)"; 

30 INPUT R 

40 Y=TAN(R) 

50 PRINT "THE TANGENT OF A" ;R ;"R AD1 AN ANGEL 1S";Y 

30999 END 



SAMPLE RUN (using 1) 

ENTER AN ANGLE {EXPRESSED iN RADIANS)? 1 
THE TANGENT OF A 1 RADIAN ANGLE IS K55741 

To convert values from degrees to radians, multiply the angle in degrees times .0174533. 
For example, r=tan(a*.0i 74533) To convert values from radians to degrees, multiply 
the angle in radians times 57.29578. 

IF YOUR COMPUTER DOESN'T HA VE IT 

If your interpreter has the SINe and COSine capability but not TANgent, substitute 
SIN(A)/COS(A) for TAN(A). 

If your interpreter does not have SINe, COSine or TANgent capability, the following 
subroutine can be substituted. 

The subroutine programs found under SIN and COS must be added to this one to make it 
work (saves space not to duplicate them here). 
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TAN 



30000 GOTO 30999 

30300 REM * TANGENT SUBROUTINE * INPUT X IN RADIANS, OUTPUT Y 

30302 REM ALSO USES A,C,W AND Z INTERNALLY 

30304 X=X*57. 29578 

30306 A = X 

30308 GOSUB 303S6 

30310 IF ABS{Y) < IE -6 THEN 30320 

30312 PRINT "TANGENT UNDEFINED" 

30315 STOP 

30320 C^Y 

30325 X^A 

30330 GOSUB 30376 

30335 Y^Y/C 

30340 RETURN 

To use this subroutine with the TEST PROGRAM to find the TANGENT of an angle 
(expressed in RADIANS), make the following TEST PROGRAM changes: 

35X=R 

40 GOSUB 30300 

To find the TANGENT of an angle (expressed in DEGREES), either delete line 30304 or 
change line 40 to: 

40 GOSUB 30306 

VARIATIONS IN USAGE 

Some (rare) interpreters convert everything to degrees automatically. 

ALSO SEE 
SIN, COS, ATN 
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TEXT is used in the APPLE II BASIC as both a command 
and a program statement to change the computer's opera- 
tion from the graphics mode to the normal TEXT (nap 
rative) mode. 

TEST PROGRAM 

10 REM 'TEXT* TEST PROGRAM 

20 TEXT 

30 PRINT "THE 'TEXT' STATEMENT DID NOT CRASH" 

40 END 




Command 
Statement 



SAMPLE RUN 



THE 'TEXT' STATEMENT DiO NOT CRASH 



VARIATIONS IN USAGE 

TEXT is used in computers with MAXBASIC to specify designated variables as string 
variables. For example, text a.f.m defines variables A,F and M as string variables. 



ALSO SEE 

GR, DEFSTR 
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THE is used in the PDP-8E as an abbreviation for the 
THEN statement. 

For more information see THEN. 
TEST PROGRAM 

10 REM 'THE (THEN)' TEST PROGRAM 

20 X=10 

30 IF X=10 THE 60 

40 PRINT "'THE' FAILED THE TEST" 

50 GOTO 99 

60 PRINT "THE 1 PASSED THE TEST" 

99 END 




Statement 



SAMPLE RUN 

■THE' PASSED THE TEST 

VARIATIONS IN USAGE 
None known. 

ALSO SEE 

THEN, IF-THEN, T., IF-T. 
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THEN is used with the IF statement to indicate the next 
operation the computer is to perform when the condition 

of the IF statement is met. i^^^^^^^^^^^^^i A 

N 
For more information see IF-THEN. l^^^^lMAS^f^^^Si S 

TEST PROGRAM 

10 REM 'THEN' TEST PROGRAM Statement 

20 X=10 

30 IF X=10 THEN 60 

40 PRINT "'THEN' FAILED THE TEST" 

50 GOTO 99 

60 PRINT "'THEN' PASSED THE TEST" 

99 END 

SAMPLE RUN 

•THEN' PASSED THE TEST 

VARIATIONS IN USAGE 

None known. 

ALSO SEE 

IF-THEN, THE, T. 
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TI is used in the Commodore PET as an abbreviation for 
the TIME function. 

For more information see TIME. 



TEST PROGRAM 

10 REM TI' TEST PROGRAM 

20 A=TI 

30 FOR X=1 TO 2000 

40 NEXT X 

50 B=TI 

60 IF B > A THEN 90 

70 PRINT "THE TI FUNCTION FAILED THE TEST*' 

80 GOTO 99 

90 PRINT ""TI 1 PASSED — ELAPSED TIME - ";B-A 

99 END 




Function 



SAMPLE RUN (typical) 

'TV PASSED — ELAPSED TIME = 1 67 

VARIATIONS IN USAGE 
None known, 

ALSO SEE 

TI$, TIME, TIMES, TIM, CLK, CLK$ 
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TIM is used by some computers (e.g. the DEC 10 BASIC 
and the Sperry Univac System/9 BASIC) to indicate the 
elapsed program run time in seconds. 

For example, print tim may print a number (such as 
10, indicating the computer program ran 10 seconds) 
before executing the PRINT statement. 

The Univac System/9 BASIC requires a variable (enclosed 
in parenthesis) following TIM, although the variable has 
no effect on the TIM function. 




Function 



TEST PROGRAM 



10 REM 'TIM' TEST PROGRAM 

20 A=TIM 

30 PRINT "TIME IS MARCHING ON" 

40 FOR X=1 TO 2000 

50 NEXT X 

60 B=TIM 

70 IF B > A THEN 100 

80 PRINT "THE TIM FUNCTION FAILED THE TEST" 

90 GOTO 999 

100 PRINT "'TIM' PASSED THE TEST — EL- APS ED TIME = 

999 END 



SAMPLE RUN (typical) 



TIME IS MARCHING ON 
'TIM' PASSED THE TEST 



ELAPSED TIME - 6 



The Hewlett Packard 2000 BASIC uses TIM(n) to indicate the current time in minutes, 
hours, days and years, depending on the TIM number (n). The TIM number (n) must be 
an integer from to 3, as follows: 

TIM(0) indicates the current minute (0 to 59) 
TIM(l) indicates the current hour (0 to 23) 
TIM(2) indicates the current day (0 to 366) 
TIM(3) indicates the current year (0 to 99) 
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Til 

TEST PROGRAM 



10 REM -riM(N)' TEST PROGRAM 

20 PRINT "THE CURRENT TIME IS M 

30 PRINT TIM(0};"MINUTES" 

40 PRINT TIMdlrHOURS" 

50 PRINT TIM(2h"DAYS" 

60 PRINT TIM(3); "YEARS" 

99 END 

SAMPLE RUN (typical) 

THE CURRENTTIME IS 
43 MINUTES 
16 HOURS 
1 94 DAYS 
78 YEARS 



ALSO SEE 

TIME, TIMES, TI, TIS, CLK, CLKS 
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TIME is used as a special feature in some computers to 
indicate the elapsed time in seconds or fractions of seconds 
from a known reference point in time. 

Most "time-shared" machines start the time count from 
1 2:00 midnight until the following midnight, while 
"stand-alone" machines start the count from the moment 
the computer is turned on until it is turned off. 

For example, print time may print a number similar to p° mi Jl 

017230 indicating the total computer run time in some un ' 

units. 

Computers are not consistent in the unit of time used to increment the TIME counter. 
For example, the Commodore PET increments the TIME value at a rate of 60 times per 
second, those using MAX BASIC increment at a rate of 1000 times per second, and the 
DEC BASIC -PLUS-2 increments at a rate of one count per second. 

Some computers (e.g. the Commodore PET) process the elapsed TIME value as a six- 
digit number, and this value cannot be changed or reset to zero except by turning the 
computer off. 

TEST PROGRAM 

10 REM 'TIME* TEST PROGRAM 

20 A=TIME 

30 PRINT "TIME IS MARCHING ON" 

40 FOR X=1 TO 2000 

S0 NEXT X 

60 B=TIME 

70 IP B > A THEN 100 

80 PRINT "THE TIME FUNCTION FAIL-ED THE TEST" 

90 GOTO 999 

100 PRINT "'TIME' PASSED THE TEST - ELAPSED TIME = ";B-A 

999 END 



SAMPLE RUN (typical) 

•TIME' PASSED THE TEST - ELAPSED TIME = 270 

VARIATIONS IN USAGE 

The DEC BASIC-PLUS-2 uses the following TIME variations: 

TIME(0) indicates the total elapsed time in seconds since midnight. 
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TIME - "- — = 

For example, 1 00 print time(0) may print a value similar to 25128 indicating 25,128 
seconds have elapsed since midnight. 

TIME(1%) indicates the total elapsed program time in tenths of seconds. 

For example, 1 00 print time(i%) may print a value similar to 85 indicating the pro- 
gram ran 8.5 seconds before printing TIME(1%). 

TIME(2%) indicates the total elapsed time in minutes that a terminal was connected to a 
time share system. 

For example, 10 print time(2%) may print a value similar to 130 indicating 130 
seconds have elapsed since the terminal was connected to the time share system. 

The Hewlett Packard 2000F TIME^SHARED BASIC uses TIME as a command to print 
the elapsed time since the terminal was logged onto the system, and the total accumu- 
lated account time. 

For example, if the command TIME is typed, it will print a report similar to this; 

CONSOLE TIME = 5 MINUTES. TOTAL TIME = 2045 MINUTES. 



ALSO SEE 

TIMES, TIM, TI,TI$,CLK$ 
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TIMES is used as a special feature by some computers 
(e.g. the Commodore PET and the DEC BASIC-PLUS-2) 
to indicate the time of day. 

The PET stores the TIMES value in hours (0 -24), 
minutes, and seconds as a six digit number (hhmmss). The 
TIMES value can be "set" by assigning a six digit number 
(enclosed in quotes) to TIMES. 




Function 



For example, time$="i 44500" sets the TIMES at 

144500 (which is the same as 2:45 p,m.). The TIMES 

continues advancing each second from the time the computer is turned on (the TIMES 

value is initialized at 000000), or from the moment it is assigned a new value. 



TEST PROGRAM 



10 REM 'TIMES' TEST PROGRAM 

20 PRINT "THE CURRENT TIME IS ";T1ME$ 

30 PRINT "THE TIMES FUNCTION PASSED THE TEST' 

40 PRINT "IF A SIX DIGIT NUMBER IS PRINTED" 

99 END 



SAMPLE RUN (typical) 



THE CURRENT TIME IS 012536 

THE TIMES FUNCTION PASSED THE TEST 

IF A SIX DIGIT NUMBER IS PRINTED 



VARIATIONS IN USAGE 

The DEC BASIC-PLUS-2 uses TIME$(0%) to indicate the time of day in hours and 
minutes. 

For example, print time$(0%) will print a time similar to 14:32. The computer auto- 
matically inserts the colon between the hours and minutes. Also, DEC BASIC-PLUS-2 
uses TIME(n%) to indicate the time (n) minutes before midnight. 



ALSO SEE 

TIME,TI,TI$,CLK$ 
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TI$ is used in the Commodore PET as an abbreviation for 
the TIMES function. 

For more information see TIMES. 
TEST PROGRAM 

10 REM 'TIS' TEST PROGRAM 

20 PRINT "THE CURRENT TIME IS ";TIS 

30 PRINT "'TIS' PASSED THE TEST" 

40 PRINT "IF A SIX DIGIT NUMBER IS PRINTED" 

99 END 

SAMPLE RUN (typical) 

THE CURRENT TIME IS 171307 

'TIS' PASSED THE TEST 

IF A SIX DIGIT NUMBER IS PRINTED 

VARIATIONS IN USAGE 
None known. 

ALSO SEE 

TIME$, TIME, TIM, CLK 




Function 
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The TRACE command is used in the APPLE II BASIC 
to activate a feature which prints program line numbers as 
each one is executed by the computer. It is used as a 
trouble-shooting aid. This execution tracing feature is dis- 
abled by the NOTRACE command. 

TRACE may also be used as a program statement to trace 
only specific sections of programs. 

TEST PROGRAM 




Command 
Statement 



10 REM 'TRACE' TEST PROGRAM 

20 PRINT "'TRACE' TRACES EACH LINE" 

30 TRACE 

40 GOTO 90 

S0 PRINT "UNTIL- TURNED OFF BY" 

60 NOTRACE 

70 PRINT "THE 'NOTRACE' STATEMENT" 

80 GOTO 1 t0 

90 PRINT "THAT FOLLOWS TH E 'TRACE' STATEMENT" 

1 00 GOTO 50 

110 PRINT "AS ILLUSTRATED BY THIS LINE" 

999 END 

SAMPLE RUN 

'TRACE* TRACES EACH LINE 

#40#90 THAT FOLLOWS THE 'TRACE' STATEMENT 

#100 #5 UNTIL TURNED OFF BY 

#60 THE 'NOTRACE' STATEMENT 

AS ILLUSTRATED BY THIS LINE 

VARIATIONS IN USAGE 

None known. 

ALSO SEE 

NOTRACE, TRON, TRACE ON, TROFF 
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The TRACE OFF command is used in the Motorola 
BASIC to disable the trace function (see TRACE ON). 
TRACE OFF may be used as a program statement to turn 
the trace off at specified areas in the program. 

TEST PROGRAM 

10 REM 'TRACE OFF' TEST PROGRAM 

20 TRACE ON 

30 PRINT "EACH UINESHOULD BE TRACED" 

40 TRACE OFF 

50 PRINT "BY THE 'TRACE ON' STATEMENT" 

60 PRINT "UNTIL. TURNED OFF BY THE 'TRACE OFF' STATEMENT" 

99 END 

SAMPLE RUN 

<30> EACH UINE SHOULD BE TRACED 
<40> BY THE 'TRACE ON' STATEMENT 
UNTIL- TURNED OFF BY THE "TRACE OFF' STATEMENT 

VARIATIONS IN USAGE 

None known. 

ALSO SEE 

TRACE ON, TRACE, NOTRACE, TROFF, TRON 




Command 
Statement 
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The TRACE ON command is used in the Motorola BASIC 
to activate a feature which prints program line numbers as 
each one is executed by the computer. It is used as a 
trouble-shooting aid. This tracing feature is disabled by 
the TRACE OFF command. 

TRACE ON may be used as a program statement to trace 
only specified sections of a program. 

TEST PROGRAM 

10 REM 'TRACE ON 1 TEST PROGRAM 

20 PRINT ""TRACE ON' TRACES EACH LINE" 

30 TRACE ON 

40 GOTO 90 

50 PRINT "UNTIL. TURNED OFF BY" 

60 TRACE OFF 

70 PRINT "THE "TRACE OFF' STATEMENT" 

80 GOTO 1 10 

90 PRINT "THAT FOLLOWS THE 'TRACE ON' STATEMENT' 

100 GOTO 50 

1 10 PRINT "AS ILLUSTRATED BY THIS LINE" 

999 END 




Command 
Statement 



SAMPLE RUN 



'TRACE ON' TRACES EACH LINE 

<40> <90> THAT FOLLOWS THE 'TRACE ON' STATEMENT 

<100> <50> UNTIL TURNED OFF BY 

<60> THE 'TRACE OFF' STATEMENT 
AS ILLUSTRATED BY THIS LINE 



VARIATIONS IN USAGE 

None known. 

ALSO SEE 

TRACE OFF, TRACE, TRON, NOTRACE, TROFF 
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TROFF (trace off) is a command which disables the trace 
feature found in many interpreters (e.g. TRS-80 Level II). 
TROFF may also be used as a program statement to turn 
the trace off at specific areas in the program. 

TEST PROGRAM 

Type the TRON command, then RUN this test program: 







f-v 




S': : . ■■-'■■■:■■ 


l:-'S'^ : . : 0'- ; ;-v- r: J 


fc 


' — . jl 



10 REM 'TROFF' TEST PROGRAM 

20 PRINT "THE FIRST TWO MNES OF THIS PROGRAM" 

30 TROFF 

40 PRINT "ARE PRINTED WITH THE TRACE TURNED ON." 

50 PRINT "THIS LINE IS PRINTED WITH THE TRACE TURNED OFF 

99 END 



Command 
Statement 



SAMPLE RUN 

<10><20>THE FIRST TWO U1NES OF THIS PROGRAM 
<30>ARE PRINTED WITH THE TRACE TURNED ON, 
THIS UINE IS PRINTED WITH THE TRACE TURNED OFF, 



VARIATIONS IN USAGE 
None known. 

ALSO SEE 

TRON, NOTRACE 
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The IRON (trace on) command is used to activate an 
analytical tool which prints program line numbers as each 
line is executed by the computer. This trace feature is 
disabled by the TROFF or NEW commands. TRON is 
intended to be used as a program tracing and trouble- 
shooting aid. 



TEST PROGRAM 

Command 

10 rem tron' test program Statement 

20 GOTO 50 

30 PRINT "OF THIS TEST PROGRAM." 

40 GOTO 70 

50 PRINT "TRON TRACES EACH LINE" 

60 GOTO 30 

70 PRINT "END OF TEST PROGRAM" 

99 END 

SAMPLE RUN 

Type TRON before running the test program. 

<10><20><50 > TRON TRACES EACH LINE 
<60><30>OF THIS TEST PROGRAM. 
<40><70>END OF TEST PROGRAM. 
<99> 

TRON may also be used as a program statement to trace specific sections of programs. To 
test this feature, type TROFF to be sure the "trace" is off, then add the following line 
to the test program and RUN it. 

35 TRON 

SAMPLE RUN 

TRON TRACES EACH LINE 

OF THIS TEST PROGRAM. 

<40>< 70>END OF TEST PROGRAM. 

<99> 

VARIATIONS IN USAGE 
None known. 



ALSO SEE 
TROFF, NEW 
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The USR function executes a machine language routine 
stored in the computer's memory. The machine language 
routine can be entered into memory from the keyboard 
using the POKE statement or from cassette tape using a 
SYSTEM command. 

The USR function can be used in programs similar to any 
other "built in" function. 




Function 



For example, 10 print usr(n) If a 

If a machine language routine which computes the square 

root of N, is stored in the computer's memory, then the computer will print the square 

root of the number N. 

To test for the USR function, you must load a machine language routine into the 
computer (at appropriate addresses) using the POKE statement or SYSTEM command. 
Refer to your computer's Manual for correct use of this special function. 



ALSO SEE 
POKE, SYSTEM 
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The VAL function is used to convert numbers which are 
written as strings, back into numeric notation. VAL has 
the effect of stripping off the strings or dollar sign. 

For example; 

t A$="35" 

20 PRINT VAL(AS) 

prints the number 3,5 as a numeric value. 




Function 



TEST PROGRAM 

10 REM 'VAL* TEST PROGRAM 

20 A$^"45.12" 

30 A=VAL(A$] 

40 PRINT "IF THE STRING ";A$;" IS CONVERTED TO THE NUMBER M ;A 

50 PRINT "THEN THE VAL FUNCTION PASSED THE TEST/' 

99 END 



SAMPLE RUN 



IF THE STRING 45. 12 IS CONVERTED TO THE NUMBER 45.1 2 
THEN THE VAL FUNCTION PASSED THE TEST, 



VARIATIONS IN USAGE 

Some computers (e.g. the TRS-80 Level II and other Microsoft variations) allow the use 
of combinations of numbers and letters with the VAL function, but the numbers must 
precede the letters. If they don't, the VAL function produces a indicating it did not 
find a number as the first character. 

For example, print VALC'iasABC") prints the number 123. 



TEST PROGRAM 

10 REM 'VALWITH MIXED STRING* TEST PROGRAM 

20 A$ = "12 O'CLOCK" 

30 A=VAU(AS) 

40 PRINT "IF THE STRING ";A$;" IS CONVERTED TO THE NUMBER";A 

50 PRINT "THE VAL. FUNCTION ACCEPTED NUMBERS MIXED WITH LETTERS. 

99 END 
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F VAL 



SAMPLE RUN 

IF THE STRING 12 O'CLOCK IS CONVERTED TO THE NUMBER 12 
THE VAL FUNCTION ACCEPTED NUMBERS MIXED WITH LETTERS, 

ALSO SEE 

STR$, ASC, CHR$, LEN, LEFTS, MID$, RIGHTS, STRINGS 
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Statement 



VLIN-AT is used in the APPLE II BASIC as a special 
feature to display a Vertical LINe AT a specified column 
on the screen. 

The vertical line length is determined by two numbers 
following the VLIN statement. These numbers indicate 
the bounds between which the line will extend. The line 
may extend any length between rows to 39. 

The number following the AT function represents the 
column number which the line must occupy. This num- 
ber may range from to 39. 

For example, vlin i 0,30 at 20 tells the computer to draw a vertical line from row 10 
to row 30 AT column 20. 

The GRaphics statement must be executed before the computer can accept the VLIN-AT 
statement (see GR), The line's color is determined by the COLOR statement (see COLOR). 

TEST PROGRAM 

10 REM 'VLIN-AT' TEST PROGRAM 

20 GR 

30 Y = 

40 FOR X=0 TO 39 

50 COLOR = Y 

60 VLiN 0.39 AT X 

70 Y=Y+t 

80 IF Y 16 THEN 100 

90 Y^=0 

100 NEXT X 

999 END 

SAMPLE RUN 

If the computer accepted the VLIN-AT statement, the screen should be filled with 39 
vertical lines of various colors. 

VARIATIONS IN USAGE 

None known. 

ALSO SEE 

GR, COLOR, PLOT, HLIN-AT, TEST 
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VTAB (vertical tab) is used by the APPLE II BASIC to 
specify the starting line location on the screen for a 
PRINT statement. VTAB values from 1 to 24, represent- 
ing the screen's 24 lines, are accepted. 

For example, vtab \z specifies the PRINT starting point 
as the 12th line down on the screen. 



TEST PROGRAM 




Statement 



10 REM 'VTAB' TEST PROGRAM 

20 PRINT "ENTER A VTAB VALUE FROM 1 TO 24"; 

30 INPUT N 

40 VTAB N 

50 PRINT "VTAB PASSED THE TEST IF THIS IS PRINTED ON LINE ";N 

99 END 



SAMPLE RUN (using 5) 



ENTER A VTAB VALUE FROM 1 TO 24? 5 



VTAB PASSED THE TEST IF THIS IS PRINTED ON LINE 5 



IF YOUR COMPUTER DOESN'T HA VE IT 

The easiest way to cause printing to start a certain number of lines down the screen is to 
first clear it [by a long series of PRINT statements in succession, or with a series of ASCII 
"line feeds" or CLS (clear screen)] . Check your ASCII chart to find your proper "N" for 
PRINT CHR$(N). 

Then, again using PRINTs or an ASCII character, move down the screen the desired 
number of lines before printing. 



VARIATIONS IN USAGE 
None known, 

ALSO SEE 

TAB, PRINT-AT, PRINT, ASC, CHRS 
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WAIT is used in some computers (e.g. those using MAX- 
BASIC) to suspend program execution for a specified 
time. 

For example, wait 30 tells the computer to wait 30 
seconds before executing the next statement. 

A few computers WAIT a fractional value (e.g. 1/10 or 

1/1000) of the specified time. Command 

For example, wait 10000 requires computers with Statement 

ADDS BASIC to WAIT 1000 seconds while the VARIAN 620 will WAIT 10 seconds. 

This program allows you to check your computer's WAIT capability. 




TEST PROGRAM #1 

10 REM 'WAIT TIME PERIOD* TEST PROGRAM 

20 PRINT "ENTER A UNIT OF TIME FOR THE COMPUTER TO WAIT* 

30 INPUT T 

40 PRINT "THE COMPUTER IS WAITING FOR";T;"UNITS OF TIME" 

50 WAIT T 

60 PRINT "THE WAIT STATEMENT PASSED THE TEST" 

99 END 



SAMPLE RUN (using 60) 



ENTER A UNIT OF TIME FOR THE COMPUTER TO WAIT? 60 
THE COMPUTER IS WAITING FOR 60 UNITS OF TIME 

THE WAIT STATEMENT PASSED THE TEST 



For a time delay alternative, substitute the following FOR-NEXT loop for WAIT in TEST 
PROGRAM # 1 . The value of T will require adjustment for your computer to produce the 
same amount of delay as the WAIT statement. 



50 FOR X-1 TO T 
55 NEXT X 



WAIT is used by some other computers (e.g. those using variations of the Microsoft 
BASIC) to suspend program execution until the byte value at a specified computer port 
meets the conditions established by two byte values listed after WAIT. 
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For example, wait 30, 6 f 4 tells the computer to WAIT until a non-zero value is produc- 
ed when the byte value at port 30 is exclusive ORed with the byte value 4, and the resul- 
tant value is logically ANDed with the byte value of 6. (Oh well . . . back to bird watch- 
ing.) When this condition is met, program execution continues at the next statement. 
If this condition is not met, the keyboard BREAK, MONITOR, ESCAPE (or whatever 
works) key can be pressed to get out of the WAIT condition. 

Each value listed in the WAIT statement must be between and 255 (the range of values 
that can be held in an 8 bit memory cell). When the last byte value (4 in the above 
example) is omitted from the WAIT statement, the computer assumes its value to be 0, 

In the above example, port 30 must equal 2 before the computer continues program 
execution as illustrated by this "truth table' 1 . 



PORT 

VALUE 



3rd BYTE 

VALUE 



2nd BYTE 

VALUE 



OR 



AND 




I 










I 



I 



















l 










Some computers (e.g. the Processor Technology Extended Cassette BASIC) WAIT until 
the byte value at the specified computer port, ANDed with the second byte value, is 
equal to the third byte value. 

For example, wait 120, 5, s the computer V/AITS until the byte value at port 120 is 
equal to 5 as shown in this truth table. 



PORT 


2nd BYTE= 


3rd BYTE 


VALUE 


VALUE 


VALUE 


5 AND 


5 


5 


l 


I 


1 











I 


l 


1 
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WAIT = 



TEST PROGRAM #2 

10 REM 'WAIT FOR PORT CONDITION 1 TEST PROGRAM 

20 PRINT "THE COMPUTER IS WAITING FOR ONLY BIT 1 TO BE SET" 

30 PRINT "IN PORT 20 (THE DECIMAL VALUE OF 2)" 

40 WAIT 20,253,2 

50 PRINT "BIT 1 IN PORT 20 IS SET" 

99 END 

SAMPLE RUN 

THE COMPUTER IS WAITING FOR ONLY BIT 1 TO BE SET 
IN PORT 20 {THE DECIMAL VALUE OF 2) 
BIT t IN PORT 20 IS SET 

If you are unable to set bit 1 in port 20, then press the keyboard BREAK key (or what^ 
ever works) to escape from this condition. 

Some computers can use WAIT as a command. 



IF YOUR COMPUTER DOESN'T HA VE IT 

If your computer has the INP capability, but does not have WAIT, substitute INP for 
WAIT in TEST PROGRAM #2, using these changes: 

40 IF !NP{20) = 2 THEN 50 
45 GOTO 40 

ALSO SEE 

INP, FOR-NEXT 
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Operators 



Since the Operators defy logical organization, we've arbi- 
trarily put the "punctuation-type" operators first, then 
miscellaneous and ended up with all the math-type opera- 
tors. Since there are relatively few operators, we won't 
attempt to index them (might take you just as long to 
search through an index anyway). 
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Pairs of quotation marks (") are used in PRINT state- 
ments to enclose letters, numbers or characters to be 
printed. If the quotes are omitted, the computer recog- 
nizes the letters as variables and prints whatever values 
may be assigned to them. 

For example, print "a" prints the letter "A". While 
print a prints the value assigned to variable A. 

Quotes can be used to print numbers without the usual 
space for their + or — sign. It can insert extra spaces by 
enclosing them. 

For example, 

10 PRINT" THE NUMBER"; 

20 PRINT "10" 



fT 




11 




^^B 


111 


Stiis 




; :&^I 



Operator 



A 
N 
S 

I 



will print 



THE NUMBER10 



Quotes cannot be "nested" inside other quotes. (The computer is unable to distinguish 
which one is the end of the actual PRINT statement.) 

For example, print "i said "hello" to him" will not work. An apostrophy is 
usually substituted for the inside quotes in these cases. 

For example, print m i said 'hello 1 to him" 

TEST PROGRAM 

10 REM 'QUOTED {"} ' PRINT STATEMENT TEST PROGRAM 

20 A=5 

30 B=10 

40 PRINT "A+B = ";A+B 

50 PRINT "THE QUOTATION MARKS PASSED THE PRINT TEST," 

99 END 

SAMPLE RUN 

A+B - 15 

THE QUOTATION MARKS PASSED THE PRINT TEST, 

Quotes can be used with most recent computers to allow the INPUT statement to serve in 
both a PRINT and INPUT capacity. 
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99 



TEST PROGRAM 

10 REM 'QUOTED {") • INPUT STATEMENT TEST PROGRAM 
20 INPUT "ASSIGN A VALUE TO VARIABLE X")X 
30 PRINT "THE VALUE F X 1S";X 
99 END 



SAMPLE RUN (using 5) 



ASSIGN A VALUE TO VARIABLE X? 5 
THE VALUE OF X IS 5 



Some computers require quotes around strings in DATA statements, while others require 
them only when the string is preceded by, encloses, or is followed by a blank, comma or 
colon. For more information see DATA. 



TEST PROGRAM 

10 REM 'QUOTED (") ' DATA STATEMENT TEST PROGRAM 

20 DATA " DATA STATEMENT " 

30 READ AS 

40 PRINT "QUOTES I N " ;A$ ;"PASSE D THE TEST" 

99 END 



SAMPLE RUN 

QUOTES IN DATA STATEMENT PASSED THE TEST 

Quotes are used with CSAVE and CLOAD in the TRS-80 Level II (and other versions of 
MICROSOFT) BASIC to assign a specific name to the program recorded on cassette tape. 

For example, 

CSAVE "A" 
CLOAD "A" 

will record a program on cassette tape, naming it "A", and will load only the program 
named "A" back into the computer. For more information and test procedures see 
CLOAD and CSAVE. 

The TRS-80 Level I BASIC uses quotes in the PRINT# statement to record data on 
cassette tape. 

For example, print#a;", ,, ;B;",";C will store the values assigned to variables A, B and C 
on cassette tape. For more information and TEST PROGRAMS see PRINT. 

ALSO SEE 

PRINT, TAB, ;(semicolon), .(comma), DATA, READ, CSAVE, CLOAD 
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The Comma is an operator with a wide range of uses. One 
of the more common is with the PRINT statement, where 
it causes individual items to be printed in pre-established 
horizontal zones. For example, print i ,2,3,4 prints each 
number in a separate zone. 

Each zone usually allows a maximum of sixteen charac- 
ters. The number of zones allowed on each line varies 
from 4 to 8, depending on screen (or printer) line width, 

TEST PROGRAM # 1 




A 
N 
S 



Operator 



10 REM TEST PROGRAM USING 'COMMA' FOR ZONING 

20 PRINT "THE FOLLOWING LINE WILL PRINT IN 4 ZONES'* 

30 PRINT 1,2,3,4 

40 PRINT "THE FOLLOWING LINES SHOW YOUR AVAILABLE ZONES" 

50 PRINT 1,2,3,4,5,6,7,8,9,10,11,12,13,14,15,16 

99 ENO 

SAMPLE RUN (4 zone per line display, 64 characters maximum per line) 

THE FOLLOWING LINE W1LLPRINT IN 4 ZONES 
12 3 4 

THE FOLLOWING LINES WILL SHOW YOUR AVAILABLE ZONES 
12 3 4 

5 6 7 8 

9 10 11 12 



13 



14 



15 



16 



The COMMA is also used to separate elements in array fields. Example, a(i,j,k). The 
COMMA separates I, J, and K into individual elements within this three -dim en si on array. 

TEST PROGRAM #2 

10 REM TEST PROGRAM USING 'COMMA' IN 2 DIMENSION ARRAY 

20 A(l,l ) = 5 

30 PRINT "A(1,1) = ";A{1,1) 

4 PRINT "LINE 20 PASSED THE TEST IF A(l ,1} = 5" 

99 END 

SAMPLE RUN 

A{1,1 )^5 

LINE 20 PASSED THE TEST IF A(l,1 } = 5. 
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The COMMA is used in a similar manner in the DATA, DIM, INPUT, ON-GOTO, and 

READ statements to separate items of data. 

This program tests the COMMA capability in the INPUT and PRINT statements. 
TEST PROGRAM #3 

10 REM 'COMMA' TEST PROGRAM 

50 PRINT "ENTER THREE NUMBERS"; 

60 INPUT A.B.C 

100 PRINT "NUMBER 1 -" ;A,2;"^";B,3 ;" = " ;C 

999 END 

SAMPLE RUN (using 11,12,13) 

ENTER THREE NUMBERS? 11,12,13 

NUMBER 1 = 11 2 = 12 3 = 13 

To test the COMMA capability in the READ and DATA statements, add these lines to 
the last TEST PROGRAM. 

80 READ D,E,F 

100 PRINT "NUMBER";Di"="iA,E; l, = ,, ;B 1 F; ,, ="!C 

1 1 DATA 1,2,3 

Run the program. The SAMPLE RUN should remain the same. 

To test the COMMA capability in the ON-GOTO statement, add these lines: 

3 FOR X=1 TO 3 

40 ON X GOTO 50,80,100 

70 NEXT X 

9 NEXT X 

Run the program, and again the sample run should remain the same. 

The computer's COMMA capability in DIM statements can be checked by adding this 
line: 

20 DIM A{1},B(2),C{3} 

The addition of this line should not change the SAMPLE RUN. 

For other applications of the COMMA see PRINT USING, AT and @. 
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VARIATIONS IN USAGE 

Some computers (e.g. those with Palo Alto Tiny BASIC) use the COMMA in LET state- 
ments similar to the way most computers use the COLON, and it's use in the PRINT and 
INPUT statements can be modified with the # and - operators. 

ALSO SEE 

DATA, DIM, INPUT, ON-GOTO, AT, @, PRINT USING, READ 
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The Period is used in the TRS-80 Level II BASIC (and 
others) to cause the computer to LIST or EDIT the last 
program line entered, listed or which caused an error in 
the computer. 

TEST PROGRAM 

10 REM ', (PERIOD)' TEST PROGRAM 

20 PRINT "THE PERIOD FOLLOWING THE LIST COMMAND 
30 PRINT "SHOULD LIST THE LAST LINE YOU ENTER" 
99 END 




Operator 



SAMPLE RUN 

Type the command: list, (if you omit the period following LIST, the entire program 
will of course be LISTed). The computer should print: 

99 END 

Add the following line to the TEST PROGRAM: 

40 PRINT "THE PERIOD PASSED THE TEST" 

Type the command: edit, (including the period). 

If the computer has this EDIT capability, the computer will print the number 40 follow- 
ed by a cursor. This indicates the computer is in the EDIT mode and is ready to modify 
line 40 (the last line entered). 

VARIATIONS IN USAGE 

Several computers (e.g. the TRS-80 Level I and other variations of Tiny BASIC) use the 
period as part of word abbreviations. 

For example, the letter I is normally used as a variable, but L can be used as an abbrevia- 
tion for INPUT or INTeger depending on how it is used in the program (for more 
Information see I.). In addition, P =PRINT, R =RUN, L =LIST, etc. 

ALSO SEE 

EDIT, LIST, I., INPUT, INT 
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A semicolon is used in PRINT statements to allow several 
printed sections to be joined together (concatenized) onto 
one line. For example, print "H'V'i" is printed as HI. 

TEST PROGRAM 

10 REM •SEMICOLON* STRING TEST PROGRAM 
20 PRINT "IF THIS SENTENCE IS PRINTED "; 
30 PRINT "ON ONE LINE, THE TEST PASSED." 
99 END 

SAMPLE RUN 




Operator 



IF THIS SENTENCE IS PRINTED ON ONE LINE, THE TEST PASSED, 

When a SEMICOLON is used to separate the printing of numeric values or numeric 
variables, a space is automatically inserted before each number to make room for its + or 
— sign. An additional space is automatically inserted after the number since it's assumed 
that such a space is always required. This feature can cause programming difficulties when 
trying to get a special print format. 

For example, print i ;Z;3 is printed with two spaces inserted between each number. 
TEST PROGRAM 

10 REM 'SEMICOLON' TEST PROGRAM WITH NUMERICS 

20 A = 5 

30 PRINT "STUDY THE SPACING BETWEEN EACH OF THE NUMBERS." 

40 PRINT 1 ;"2'V3";4;A;"6"; ~7 

50 PRINT "12345678901234567890" 

99 END 

SAMPLE RUN 

STUDY THE SPACING BETWEEN EACH OF THE NUMBERS. 

1 23 4 5 6-7 

1 2345678901234567890 



VARIATIONS IN USAGE 

A few interpreters insert a space between strings being concatenized. Such a (rare) feature 
eliminates the need for the space after the letter "D" in line 20 of the fust TEST. 



ALSO SEE 

COMMA, PRINT USING, TAB 
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The COLON allows placing more than one statement on a 
single program line. 

For example, 10 print "sample line" :let a-10: 
goto 99 holds three separate statements . . . PRINT, 
LET and GOTO in one program line, number 10. 



SAMPLE RUN 




Operator 



10 REM 'COLON {:) OPERATOR' TEST PROGRAM 

20 PRINT "THIS TEST"; :FOR X=^1 TO 5000: NEXT X: PRINT ** IS COMPLETE" 

9 9 END f 

SAMPLE RUN 

THIS TBST(PAUSE) IS COMPLETE 

GOTO, IF-GOTO, IF-THEN, ON-GOTO and other branching statements must be the last 
statement on a multiple statement line to prevent branching out of it before the entire 
line is executed. 

For example, in the line 

10 FOR X=l TO 10:NEXT X:GOTO 100:PR1NT ''THE LOST WORDS" 

The computer executes the GOTO statement and branches to line 100 before it has a 
chance to execute the PRINT statement. There is no way to PRINT the "LOST WORDS". 

Most computers do not allow DATA statements in multiple statement lines. Others (e.g. 
IMSAI) do not execute statements on the same line if they follow a GOSUB statement 
even though a RETURN directs execution back to that line. 

Be especially careful to put IF-THEN statements only at the end of multiple statement 
lines. If one fails, execution will fall to the next numbered line, not to the next statement 
in the same line, 

1 IF A- 10 THEN B = A:PRINT "A IS NOT EQUAL. TO 10" 
20 END 

If the value of A is not equal to 10, the condition of the IF-THEN statement is not met, 
and the program ENDs without initializing the value of B to A or executing the PRINT 
statement. When IF-THEN statements can't be placed last on a multi-statement line, they 
must be given a "private line." 
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IF YOUR COMPUTER DOESN'T HA VE IT 

Many computers have no provision for writing more than one program statement on a 
numbered line. Others that do however, may use a backslash (\) instead of a colon. A very 
few use a semicolon. 



VARIATIONS IN USAGE 

None known. 



ALSO SEE 

V ;, GOTO, IF-THEN, IF GOTO, ON-GOTO, etc. 
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Parentheses are used in arithmetic operations to determine 
the order in which math operations are performed. Math 
operations enclosed within parentheses are performed 
before those outside the parentheses. If a math operation 
is enclosed in parentheses which is in turn enclosed within 
another set of parentheses (and so on), the computer first 
performs those operations "buried the deepest". When 
there is a "tie", the operation to the left is executed first. 

For example, a=5+(((2*4)-2)*3) The computer performs 
this math operation in the following sequence: 

A = 5+((8-2)*3) = 5+(6*3) - 5+18 = 23 




Operator 



TEST PROGRAM 

10REM'( ) PARENTHESES' TEST PROGRAM 

20 A={l0*(5~3))/2 

30 PRINT "A = ";A 

40 PRINT "THE PARENTHESES PASSED THE TEST IFA= 10" 

99 END 

SAMPLE RUN 

A = 1 

THE PARENTHESES PASSED THE TEST IF A = 10 

PARENTHESES are required with "logical math" operators to identify the two state- 
ments being compared. 

For example, if (a=8) * (b=6) then 80 
For more information see * and AND, 

PARENTHESES are also used to enclose the elements in DIM statements and array 
variables. For more information see DIM, 

TEST PROGRAM 

10 REM '( ) PARENTHESES' TEST PROGRAM USING DIM AND ARRAYS 

20 DIM A{5,5) 

30 A(1,1) = 20 

40 PRINT "( ) PASSED THE TEST IN LINES" ;A( 1 ,1 );" AN D";A( 1 ,t ) + l 

99 END 
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( I 
[ ] 



SAMPLE RUN 

( ) PASSED THE TEST IN LINES 20 AND 30 

Most computers with built in functions use PARENTHESES to enclose the numbers or 
letters to be manipulated. 

For example, log(i0) 

Most computers that use parentheses but not brackets ([ ]) allow parentheses to substi- 
tute for brackets without ill effect. In most cases, parentheses can be used instead of 
brackets. 

For example, 

[(A*B)/c] 

can be written 

({A*B}/C} 

ALSO SEE 

*,+,AND,OR,DIM 
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The @ Operator is used by a few computers (e.g. TRS-80 
Level II) to specify a PRINT statement starting location 
on the video screen. Its value should be from to 1023 
and must be followed by a comma. For example, print 
@ 475, "heulo" prints the word HELLO on the CRT 
starting at grid position 475. 



TEST PROGRAM 

10 REM "©'■ PRINT MODIFIER TEST PROGRAM 

20 PRINT @ 128, "2. IF THIS LINE IS PRINTED AFTER LINE 1. 

30 PRINT @ 0, "1. THE @ OPERATOR PASSED THE TEST" 

40 GOTO 40 

99 END 




Operator 



SAMPLE RUN 

1. THE @ OPERATOR PASSED THE TEST 

2. IF THIS LINE IS PRINTED AFTER LINE 1. 

IF YOUR COMPUTER DOESN'T HAVE IT 

If your computer does not use the @ operator as a PRINT modifier, this feature can be 
simulated by using an appropriate number of PRINT statements (to activate line feeds) 
and spaces to arrive at the same location on the CRT. 

VARIATIONS IN USAGE 

The @ (AT) operator is used by some computers (e.g. TRS-80 Level II) to erase the last 
line displayed on the screen and execute a carriage return. For example, type 10 rem 
line deletion test (but don't hit the ENTER or RETURN key) and press the @ 
key. The line should be erased and the cursor should return to the left margin. 

The same operation can be accomplished on some computers by pressing the RUB (rub 
out), SCR (scratch), +- (left arrow) or SND (send) key, or by pressing the ENTER (or 
RETURN) key before and after typing the number of the line to be deleted. 



ALSO SEE 

PRINT, AT, PRINT AT 
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The # sign is used to specify individual variables as being 
of "double-precision". Double precision variables are 
capable of storing numbers containing 17 digits (only 16 
digits are printed). Single-precision variables are accurate 
to 6 digits. 

The # sign must be placed after a variable for it to be de- 
fined as having double-precision, each time that variable 
is used in the program. If the # sign is found with a vari- 
able that is listed in DEFSNG or DEFINT statements 
(within the same program), the double precision character 
(#) over-rides their action and declares the variable to be 
of double-precision. 




Operator 



TEST PROGRAM 



10 REM ■#• DOUBLE PRECISION OPERATOR TEST PROGRAM 

20 DEFSNG A,B 

30 A=t. 234567890123456 

40 B# = l„2345678901 23456 

50 IF A = B# THEN 100 

60 PRINT "A = ";A 

70 PRINT "B# = ";B# 

80 PRINT "THE # SIGN PASSED THE DOUBLE PRECISION TEST" 

90 GOTO 999 

100 PRINT "THE # SIGN FAILED THE DOUBLE PRECISION TEST" 

999 END 

SAMPLE RUN 

A = 1.23457 

B# = K234567890123456 

THE # SIGN PASSED THE DOUBLE PRECISION TEST 

The # (number sign) is used by a few computers as a shorthand symbol for the PRINT 
statement. For more information see PRINT. 



TEST PROGRAM #1 



10 REM '#' TEST PROGRAM 

20 #"THE # SIGN PASSED THE PRINT TEST" 

99 END 
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_ # 

SAMPLE RUN 

THE # SIGN PASSED THE PRINT TEST 

The # operator is used by a few computers as the relational operator "not-equaUo" 
(<>). 

For example, if a#b then i 00 tells the computer to branch to line 100 if the value of 
variable A is not equal to variable B. 

The# operator is used in the PRINT USING statement by most computers using a Micro- 
soft BASIC to indicate the PRINT position for each digit in a number or numeric 
variable. If the PRINT USING statement contains more # signs than the number of digits 
in a number, the computer prints a space for each unused # sign to the left of the decimal 
point, and a zero for each unused # sign to the right of the decimal point. 

For example, 10 print using ••#####. ###";i 2.5 will print the number 12.500 with 
3 blank spaces printed to the left of the number 1 in place of the 3 unused # signs. 

For more information see PRINT USING. 
TEST PROGRAM #2 

10 REM ■#' PRINT USING TEST PROGRAM 

20 PRINT "ENTER A VALUE FOR VARIABLE N"; 

30 INPUT N 

40 PRINT "THE N U M BE R" ;N ;"1S PRINTED AS"; 

50 PRINT USING "####.##" ;N 

99 END 

SAMPLE RUN (using 12.5) 

ENTER A VALUE FOR VARIABLE N? 125 
THE NUMBER 12.5 IS PRINTED AS 12.50 

Computers with file handling capability use the # operator in such statements as 
INPUT#, PRINT*, READ#, CLOSE*, and others to indicate a device number to store 
data and retrieve data from external memory such as disc and cassette tape. 
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TEST PROGRAM #3 (stores data on cassette tape TRS-80 Level II) 
Set the cassette recorder to the RECORD mode and RUN this program. 

10 REM 'PRINT#' TEST PROGRAM 

20 PRINT "DATA SHOULD BE RECORDING ON CASSETTE TAPE" 

30 PRINT#-1, "TEST" ,t,2,3 

40 PRINT "PRINT* HAS COMPLETED THE DATA TRANSFER" 

99 END 

SAMPLE RUN 

DATA SHOULD BE RECORDING ON CASSETTE TAPE 
PRINT# HAS COMPLETED THE DATA TRANSFER 

To test the computer's READ# capability, rewind the cassette tape, set the recorder to 
the PLAY mode, erase memory and RUN the next TEST PROGRAM. 

TEST PROGRAM #4 (enters data from cassette into the computer) 

10 REM 'INPUT*' TEST PROGRAM 

20 PRINT "THE COMPUTER SHOULD NOW READ DATA FROM CASSETTE" 

30 INPUT#-I,AS,A I B,C 

40 PRINT "THE INPUT* STATEMENT PASSED THE TEST IF" 

50 PRINT A$;A;B;C;"IS PRINTED" 

99 END 

SAMPLE RUN 

THE COMPUTER SHOULD NOW READ DATA FROM CASSETTE 
THE INPUT* STATEMENT PASSED THE TEST IF 
TEST 1 2 3 IS PRINTED 

in large time-sharing systems (e.g. the DEC-10), one program can access a number of 
different data files, each of which is given a name and stored on disc. A statement in the 
program gives a number to each file it will be using, and that file will be referred to by 

number, not name. The # sign then literally means "number" the file nurn- 

ber(name) from which DATA is to be READ, INPUT, PRINTed or otherwise processed. 

Example : 

30 FILE #1, "TESTING" 
8($ READ #1.A.B.C.D.E 

etc. 
ALSO SEE 

DEFDBL, DEFSNG, DEFINTJ, %. PRINT. REM. PRINT USING. READ*, FILE#,< > 
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The $ symbol following a letter or letter/number combi- 
nation is used to declare a variable to be a string variable. 

Information declared a string variable in a program state- 
ment must usually be enclosed in quotation marks. For 
example, a% = m the basic handbook." If an INPUT 
statement is used to assign the information entered to a 
string variable, then quotes are not usually required. (See 
INPUT and READ.) 




Operator 



TEST PROGRAM #1 

10 REM *S' TEST PROGRAM WITH STRING STATEMENT 

20 AS=" LINE 20" 

30 PRINT "THIS COMPUTER PASSED THE '%' TEST 1N";A$ 



SAMPLE RUN 

THIS COMPUTER PASSED THE '$' TEST IN L.I N E 20 

The number of characters that can be assigned to a string variable is limited by the com- 
puter's interpreter. Most computers with string capability accept at least 16 characters, 
and some can accept as many as 255. 

Some computers (e.g.Hewlett-Packard) require you to reserve memory space for each 
separate string with a DIM statement [e.g. 10 dim a$(s0)]. (See DIM and CLEAR.) 

The following program demonstrates the assignment of characters to the variable A$ 
(pronounced "A string"): 

TEST PROGRAM #2 

10 REM '»• INPUT STRING WITH LENGTH TEST PROGRAM 

20 PRINT "ENTER A KNOWN QUANTITY OF CHARACTERS" 

30 INPUT AS 

40 PRINT "COUNT THE NUMBER OF CHARACTERS PRINTED BELOW" 

50 PRINT AS 



SAMPLE RUN (Typical) 

The "character string" shown in the sample run is 10 characters long: 

ENTER A KNOWN QUANTITY OF CHARACTERS 

? 1234567890 

COUNT THE NUMBER OF CHARACTERS PRINTED BELOW 

1234567890 
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If all the characters were printed and no error message appeared, RUN again and add 
perhaps 10 more characters. If that prints, continue the process until characters start 
being chopped off the end, or an error message appears. 

Most computers which can handle strings allow all the letters of the alphabet to serve as 
string variable designators. A few computers allow only a few, (e.g. Radio Shack TRS-80 
LEVEL I allows only two strings, AS and B$ and they cannot be compared against each 
other.) 

The next program tests the full range (A and Z) of alphabet characters allowed by your 
computer. 

TEST PROGRAM #3 

10 REM 'S* (STRING) VARIABLE TEST PROGRAM 

20 AS="LINE 20. " 

30 PRINT "AS PASSED THE TEST IN ";AS; 

40 ZS="AND 2$ IN L.INE 40" 

50 PRINT Z$ 

99 END 



SAMPLE RUN 

AS PASSED THE TEST IN LINE 20, AND Z$ IN LINE 40 

Many string handling computers allow combinations of letters, numbers and symbols to 
specify string and numeric variables. Each variable must start with a letter, but only the 
first several (usually 2) alphanumeric characters are recognized and processed by the 
interpreter. For example, ab34k$ and abynss (if accepted), are usually processed as 
the same string variable (AB$) since the first two letters are identical. A little experiment- 
ing will quickly show your machine's capability. 

TEST PROGRAM #4 

10 REM '$' (STRING NAME} TEST PROGRAM 

20 ABCDES^'TEST STRING" 

30 PRINT "ABXYZ$ - ";ABXYZ$ 

40 PRINT "A8123S - ";A8123$ 

50 PRINT "ONLY THE FIRST TWO LETTERS OF THE STRING NAME" 

60 PRINT "WERE RECOGNIZED IF THE TWO STRINGS ARE IDENTICAL" 

99 END 
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SAMPLE RUN 

ABXYZS - TEST STRING 

AB123S = TEST STRING 

ONLY THE FIRST TWO LETTERS OF THE STRING NAME 

WERE RECOGNIZED IF THE TWO STRINGS ARE IDENTICAL 

Words that are intrinsic Statements or Functions cannot be used as string or numeric 
variables. For example, SPRINTSS may be an illegal string variable because it contains the 
word "PRINT". Refer to your owner's manual for a list of "reserved words" that cannot 
be used in your computer's programs. 

Most computers that accommodate strings, permit string comparison. That is, one string 
or string variable can be compared character by character against another string or string 
variable using relational operators. Strings must be enclosed in quotation marks when 
compared to a string variable. 

TEST PROGRAM #5 

10 REM •$' (STRING} COMPARISON TEST PROGRAM 

20 READ AS 

30 IF AS="WHOA" THEN 60 

40 PRINT A$, 

50 GOTO 20 

60 PRINT "STRINGS CAN BE COMPARED." 

70 DATA ONE, TWO, WHOA 

99 END 

SAMPLE RUN 

ANE TWO STRINGS CAN BE COMPARED. 



VARIATIONS IN USAGE 
None known in the BASIC language. 

ALSO SEE 

DEFSTR, CHR$, FRE(stiing), INKEYS, LEN, LEFTS, MIDS, RIGHTS, STRS, 
STRINGS, VAL, LET, DATA, READ, DIM and CLEAR 
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The ! (exclamation mark) is used to specify individual 
variables as being of "single-precision". Single precision 
variables are capable of storing numbers containing no 
more than 7 digits (only 6 digits are printed). Double- 
precision means having 16 digit precision. 

Since variables are automatically single precision, the ! 
operator is used in programs to change a variable back to 
single precision after it has been declared double-precision 
by a previous DEFDBL statement or # operator. 




Operator 



TEST PROGRAM 



t0 REM 'I' SINGLE PRECISION OPERATOR TEST PROGRAM 

20 DEFDBL X,N 

30 N^l 234.56789012345 

40 X=N 

50 PRINT "DOUBLE PRECISION VARIABLE X =";X 

60 Xl-N 

70 PRINT "SINGLE PRECISION VARIABLE X! =";X! 

80 PRINT "THE '!' SINGLE PRECISION OPERATOR PASSED THE TEST" 

99 END 

SAMPLE RUN 

DOUBLE PRECISION VARIABLE X = 1234.56789012345 

SINGLE PRECISION VARIABLE X! = 1234,57 

THE ■!• SINGLE PRECISION OPERATOR PASSED THE TEST 

The ! operator is also used by some computers (e.g. those using the Microsoft BASIC) in 
the PRINT USING statement to allow only the left-most character in a string to be 
printed. 

For example, print using"! 'vcompusoft" should print the letter "C'\ 

For more information see PRINT USING and the next Test Program. 

TEST PROGRAM 

t0 REM •! STRING SPECIFIER' TEST PROGRAM 

70 PRINT "ENTER A SAMPLE WORD*'! 

30 INPUT AS 

40 PRINT "THE FIRST LETTER IN THE WORD ";A$;" IS "; 

50 PRINT USING "!";AS 

99 END 
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SAMPLE RUN (using HANDBOOK) 

ENTER A SAMPLE WORD? HANDBOOK 

THE FIRST LETTER IN THE WORD HANDBOOK IS H 



VARIATIONS IN USAGE 

Some interpreters (e.g. the COMPUMAX BASIC) use ! as an abbreviation for the REMark 
statement. 



TEST PROGRAM 

10 PRINT '•'! (REMARK) ' TEST PROGRAM" 

20 ! PRINT ■• THE I SIGN FAILED THE REM TEST" 

30 ! THE ! SIGN FAIL-ED THE REMARK TEST IF LINE 20 IS PRINTED" 

40 PRINT "THE ! SIGN PASSED THE TEST" 

99 END 



SAMPLE RUN 

•! (REMARK) ' TEST PROGRAM 
THE ! SIGN PASSED THE TEST 

ALSO SEE 

DEFDBL, DEFSNG, #, PRINT USING 
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% is used by some computers (e.g. those using Microsoft 
BASIC) to define variables as integers. When the % sign is 
placed to the right of a variable, that variable is then only 
capable of storing integer values. 

For more information on the use of the INTeger function 
see INT. 



TEST PROGRAM #1 

10 REM •% INTEGER OPERATOR' TEST PROGRAM 

20 l%=2,864 

30 IF l% = 2 THEN 60 

40 PRINT "THE % INTEGER OPERATOR FAILED THE TEST" 

50 GOTO 99 

60 PRINT "THE % INTEGER OPERATOR PASSED THE TEST" 

99 END 




Operator 



SAMPLE RUN 

THE % INTEGER OPERATOR PASSED THE TEST 

The % operator is used by some computers (e.g. those using Microsoft BASIC) in the 
PRINT USING statement. It causes the printing of as many left-most characters in a 
string as there are spaces between two % signs. The computer also counts the two % signs, 
therefore no less than two characters can be specified. (To specify one character in the 
string, see the ! operator.) 

For example, print using "% "/o'^'abcdefghi" should print the first four letters 
"ABCD" because two spaces were included between the % signs (2 spaces + 2 % signs = 4 
letters). For more information see PRINT USING. 

TEST PROGRAM #2 

10 REM *%' STRING SPECIFIER TEST PROGRAM 

20 AS-TESTIMONIAL" 

30 PRINT "THE % OPERATOR PASSED THE STRING SPECIFIER "; 

40 PRINT USING "% %";AS 

99 END 
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% = 

SAMPLE RUN 

THE % OPERATOR PASSED THE STRING SPECIFIER TEST 

Some computers use the % sign in the PRINT USING statement to "flag" a number as 
having exceeded the field specifier (#). 

For example, print using "###.#";! 234.56 should print the number %1234„6 U The 
entire number on the left side of the decimal point is printed when it exceeds the field 
specifier limits. If the number on the right side of the decimal point exceeds the field 
specifier, it is rounded up. For more information see PRINT USING. 

TEST PROGRAM #3 

10 REM '%' PRINT USING OVERFLOW TEST PROGRAM 

20 A=t 23.45 

30 PRINT "THE PRINT USING STATEMENT CHANGED #";A;"TO *•; 

40 PRINT USING "##.#" ;A 

99 END 

SAMPLE RUN 

THE PRINT USING STATEMENT CHANGED # 123.45 TO %1 23.5 

ALSO SEE 

INT., I., PRINT USING, # 
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The ? (question mark) is used by many computers (e.g. 
those with variations of Microsoft BASIC) as an abbrevia- 
tion for PRINT. Most (but not all) automatically change 
the ? sign to the word "PRINT" when the program is 
LISTed. 

For more information see PRINT. 



TEST PROGRAM 

10 REM '? {PRINT)' TEST PROGRAM 

20 ? "THE 7 SIGN PASSED THE PRINT TEST" 

99 END 




Operator 



SAMPLE RUN 



THE 7 SIGN PASSED THE PRINT TEST 



Most computers print a ? when it executes the INPUT statement, indicating it is waiting 
for you to enter some data or an answer. Execution resumes when the ENTER or 
RETURN key is pressed. 

For more information see INPUT. 



TEST PROGRAM 

10 REM '?■ {INPUT REQUEST) TEST PROGRAM 

20 PRINT "THE 7 SIGN PASSED THE TEST" 

30 PRINT "IF THE FOLLOWING LINE CONTAINS THE ? SIGN' 

40 INPUT A 

99 END 

SAMPLE RUN 

THE 7 SIGN PASSED THE TEST 

IF THE FOLLOWING LINE CONTAINS THE 7 SIGN 



Some computers (e.g. those with a Microsoft BASIC) use the ? sign with the CLOAD 
command to compare a program stored in the computer's memory with a program stored 
ou cassette. 

To test this feature, see the test procedures under CLOAD. 

ALSO SEE 

PRINT, #, INPUT, CLOAD, LIST 
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The \ operator is used by a few computers to allow mul- 
tiple statements in one program line. 

For example, 10 a=i#\b=5\c=a~b\print c combines 
four operations in one line. 

For more information see: (Colon). 



TEST PROGRAM 




Operator 



10 REM ^OPERATOR 1 TEST PROGRAM 

20 PRINT "THIS TEST ";\FOR X=l TO 500\NEXT X\PR1NT "IS COMPLETE" 

99 END 



SAMPLE RUN 



THIS TEST IS COMPLETE 



VARIATIONS IN USAGE 



The back-slash is sometimes seen separating letters and numbers as they are being erased 
or "rubbed out" on some terminals. This is often done when correcting typing errors. 

ALSO SEE 

: (COLON) 
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The ** (double asterisk) is used as an arithmetic exponen- 
tiation sign in some computers (e.g. the DEC-10, DEC- 
17D, DEC BASIC-PLUS-2, H.P. 3000, and those using 
the MAXBASIC) to compute the value of a base number 
to a specified power. 

For example, 2**3 is the same as the cube of 2 or 2^„ For 
more information see t. 



TEST PROGRAM 




Operator 



10 REM '** (EXPONENTIATION}' TEST PROGRAM 

20 PRINT "ENTER A BASE NUMBER"; 

30 INPUT B 

40 PRINT "NEXT, ENTER THE EXPONENT"; 

50 INPUT E 

60 A-B**E 

70 PRINT "THE NUMBER";B;"TO THE";E;"POWER IS";A 

30999 END 

SAMPLE RUN (using 4 and 3) 

ENTER A BASE NUMBER? 4 

NEXT, ENTER THE EXPONENT? 3 

THE NUMBER 4 TO THE 3 POWER IS 64 

The ** (double asterisk) is also used by some computers (e.g. those using Microsoft 
BASIC) in the PRINT USING statement. An asterisk (*) is printed in all unused spaces to 
the left of a specified number's decimal point. The primary purpose for doing this is to 
prevent someone from increasing the size of a check printed by computer. 



For example, print using 1 '****** 



*";456.25 Will print ****456.25 



The # sign represents the spaces set aside for the numeric value to be printed. The unused 
spaces are filled by a * sign. 

For more information see PRINT USING. 



TEST PROGRAM 

10 REM '** PRINT SPECIFIER' TEST PROGRAM 

20 PRINT "ENTER A SAMPLE NUMBER"; 

3 INPUT N 

40 PRINT USING "**######";N 

50 PRINT "THE ** SIGN PASSED THE PRINT USING TEST' 

99 END 



324 



** 



SAMPLE RUN (using 468) 

ENTER A SAMPUE NUMBER? 468 

****468 

THE ** SIGN PASSED THE PRINT USING TEST 



ALSO SEE 

PRINT USING, t, !, A and i 
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The ^ (circumflex) is an arithmetic exponentiation sign 
used to compute the value of a base number to a specified 
power. 

For example, 2^3 is the same as the cube of 2 or 2^ 

For more information see f . 

TEST PROGRAM 

10 REM ' ^{EXPONENTIATION)' TEST PROGRAM 

20 PRINT "ENTER A BASE NUMBER'*; 

30 INPUT B 

40 PRINT "NEXT, ENTER THE EXPONENT"; 

50 INPUT E 

60 A=B ^ E 

70 PRINT "THE N UM BE R" ;B ;"TO TH E" ;E;"POWE R IS";A 

30999 END 




Operator 



SAMPLE RUN (using 4 and 3) 

ENTER A BASE NUMBER? 4 

NEXT, ENTER THE EXPONENT 3 

THE NUMBER 4 TO THE 3 POWER IS 64 



VARIATIONS IN USAGE 
None known. 



ALSO SEE 

t, A, !,and *=> 
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The most common use of the + sign is in arithmetic addi- 
tion. Example, print a+b prints the sum of variables A 
andB. 

TEST PROGRAM 

10 REM ■ + ' MATH OPERATOR TEST PROGRAM 

20 PRINT "ENTER A VALUE FOR VARIABLE A"; 

30 INPUT A 

40 PRINT "ENTER A VALUE FOR VARIABLE B"; 

50 INPUT B 

60 C = A + B 

70 PRINT "THE SUM O F" ;A ;" + " ;B ;"IS" ;C 

99 END 




Operator 



SAMPLE RUN (using 6 and 14) 

ENTER A VALUE FOR VARIABLE A? 6 
ENTER A VALUE FOR VARIABLE B? 14 
THE SUM OF 6 + 14 IS 20 

Some computers use the + sign as a logical "OR" operator in an IF-THEN statement. 

For example, 10 if (a=8)+(b=6) then 80 reads: if the value of A equals 8 OR the value 
of B equals 6 the IF-THEN condition is met and execution continues at line 80. 

Note that both (A=8) and (B=6) are enclosed in parenthesis. Since there is no other 
apparent reason to enclose such simple equations in parenthesis, they are the tip-off in 
determining if the + is used for addition or as a logical OR. 



TEST PROGRAM 

1 REM ' + ' LOGICAL OPERATOR TEST PROGRAM 

20 PRINT "ENTER A VALUE FOR VARIABLE A"; 

30 INPUT A 

40 PRINT "ENTER A VALUE FOR VARIABLE B"; 

50 INPUT B 

60 PRINT "A = ";A ( "B=";B 

70 IF {A = 8) + (B = 6) THEN 100 

80 PRINT 'NEITHER A ^ 8 NOR B = 6" 

90 GOTO 999 

100 PRINT "EITHER A=SORB^6" 

999 END 
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SAMPLE RUN (using 4 and 6) 



ENTER A VALUE FOR VARIABLE A? 4 

ENTER A VALUE FOR VARIABLE B? 6 

A - 4 B = 6 

EITHER A = 8 OR B - 6 



VARIATIONS IN USAGE 

Many computers use the + sign to join (concatenize) separate strings into one. For ex- 
ample, print ••H ,, + "i" concatenizes the strings "H" and "I" to form the word HI. 



TEST PROGRAM 

10 REM • + ' CONCATENATION TEST PROGRAM 

20 AS = "FASSED THE CON" 

30 B$="CATENATION TEST" 

40 PRINT "THE + SIGN "; 

50 PRINT A$*B$ 

99 END 

SAMPLE RUN 

THE + SIGN PASSED THE CONCATENATION TEST 

The + sign is used, by some computers in PRINT USING statements to automatically 
insert a + sign before positive numbers. 

ALSO SEE 

AND, *,$, PRINT USING 
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The ~~ symbol is used as an arithmetic subtraction sign to 
find the arithmetic difference between two numbers or 
numeric variables. For example, print a-b prints the 
value of variable A minus the value of variable B\ 



The - sign is also used for negation in arithmetic opera- 
tions. Negation means simply "changing the sign from 
what it is to the opposite". 




Operator 



Example, print -{3-8) subtracts 8 from 3 which results in a negative 5. The first - 

(negation) sign reverses the sign within the parentheses and prints 5 (the + sign is 
implied). 

TEST PROGRAM 

10 REM '-SIGN' TEST PROGRAM 

20 A = 3 

30 B = 6 

40 C=B-A~(B-A) 

50 PRINT "C =";C 

60 PRINT "THE - SIGN PASSED THE TEST IFC = fl 

99 END 



SAMPLE RUN 

C = 

THE - SIGN PASSED THE TEST IFC = 



VARIATIONS IN USAGE 

None known. 
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The / sign is used as an arithmetic division sign to find the 
quotient of two numbers or numeric variables. 

Example, 8/4 is the same as 8-^4 
TEST PROGRAM 

10 REM 7 DIVISION SIGN' TEST PROGRAM 

20 A^8 

30 B=4 

40 C = A/B 

50 PRINT "C ^";C 

60 PRINT "THE / SIGN PASSED THE TEST IFC= 2" 

99 END 




Operator 



SAMPLE RUN 

C = 2 

THE / SIGN PASSED THE TEST IFC = 2 

VARIATIONS IN USAGE 

None known. 
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The * symbol (asterisk) is used as an arithmetic multipli- 
cation sign (instead of the letter "X") to find the product 
of two numbers or numeric variables. 

TEST PROGRAM 

10 REM '*• MATH OPERATOR TEST PROGRAM 

20 A=5 

30 B=A*6 

40 PRINT "* PASSED THE TEST IN LINE'-iB 

99 END 

SAMPLE RUN 

* PASSED THE TEST IN LINE 30 




Operator 



VARIATIONS IN USAGE 

Some computers also use the * sign as the "lotical math" operator for "AND". For 
example: 

IF (A = 8) * (B=6) THEN 80 

reads, if the value of A equals 8 AND the value of B equals 6 then the IF-THEN condi- 
tion is met and execution continues at line 80, 

Note that both (A=8) and (B=6) are enclosed in parenthesis. This is the tip to look for 
when determining if an * is being used for multiplication or as a logical AND. 

TEST PROGRAM 

10 REM •*' LOGICAL 'AND* TEST PROGRAM 

20 A=8 

30 B-6 

40 IF (A = 8) * (B=6) THEN 70 

50 PRINT "* FAILED THE TEST AS AND OPERATOR" 

60 GOTO 99 

70 PRINT "* PASSED THE AND OPERATOR TEST" 

99 END 

SAMPLE RUN 

* PASSED THE AND OPERATOR TEST 

The * asterisk is used by some computers to specify a format for printing numeric values 
or strings in the PRINT USING statement. See PRINT USING for details. 



ALSO SEE 

AND, PRINT USING 
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MATH OPERATOR 

The = symbol is used as a mathematical equal sign. For 
example, A=3+5 assigns the value 8 to variable A, 

TEST PROGRAM 

10 REM TEST PROGRAM USING - AS MATH OPERATOR 
20 A^4 

30 b-6 Operator 

40 C-A + B 

50 PRINT "C =";C 

60 PRINT "THE - SIGN PASSED THE TEST IFC= 10" 

99 END 

SAMPLE RUN 

C - 10 

THE « SIGN PASSED THE TEST IF C = 1 



RELATIONAL OPERATOR 

The = sign is also used by most computers as a relational operator to compare two 
numeric values for equality. For example, if a=b then t 00 tells the computer to branch 
to line 100 when then numeric variable A is equal to numeric variable B. If the condition 
of the = sign is not met (i.e. A^B), the test "falls through" and program execution con- 
tinues on the next line. 

Most computers also use the = sign for string comparisons. This feature allows one string 
or string variable to be compared character-by-character against another string or string 
variable. In the example, if as = "abcd" then i 00 the interpreter compares the 
ASCII code of each character (from left-to-right) stored in string variable A$ against the 
characters enclosed in quotation marks. If the ASCII code of all characters is found equal, 
the computer branches or "jumps" to line 100. If the ASCII code of all characters is not 
found equal, the test "falls through" and program execution continues on the next line. 

TEST PROGRAM 

10 REM TEST OF - SIGN AS NUMERIC COMPARISON OPERATOR 

20 A = 5 

30 IF A = 5 THEN 60 

40 PRINT M - SIGN FAILED NUMERIC COMPARISON TEST" 

50 GOTO 99 

60 PRINT M = SIGN PASSED NUMERIC COMPARISON TEST" 

99 END 

SAMPLE RUN 

= SIGN PASSED NUMERIC COMPARISON TEST 
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TEST PROGRAM 



10 REM TEST PROGRAM USING = FOR STRING COMPARISON 

20 AS - "ABCDE" 

30 IF AS = "ABCDE" THEN 60 

40 PRINT "THE - SIGN FAILED THE STRING COMPARISON TEST" 

50 GOTO 99 

60 PRINT "THE « SIGN PASSED THE STRING COMPARISON TEST" 

99 END 



SAMPLE RUN 

THE - SIGN PASSED THE STRING COMPARISON TEST 



VARIATIONS IN USAGE 

Different interpreters allow different length character strings to be compared. Some allow 
only one letter to be compared against another single letter, while others allow enough 
characters to compare an entire name and address, or more. 

The combination of > or < with = is very common. Sometimes only numerics can be 
so compared, but in most cases the ASCII values of strings are automatically derived and 
those values compared. 

ALSO SEE 
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The A (carat) is an arithmetic exponentiation sign used 
to compute the value of a base number to a specified 
power. 

For example, 2 A 3 is the same as the cube of 2 or 2^ 

For more information see t. 

TEST PROGRAM 

10 REM » A (EXPONENTIATION)' TEST PROGRAM 

20 PRINT "ENTER A BASE NUMBER"; 

30 INPUT B 

40 PRINT "NEXT, ENTER THE EXPONENT"; 

50 INPUT E 

60 A=BAE 

70 PRINT "THE N UM BE R' ';B;"TO TH E";E;„POWER IS";A 

30999 END 

SAMPLE RUN (using 4 and 3) 

ENTER A BASE NUMBER? 4 
NEXT, ENTER THE EXPONENT? 3 
THE NUMBER 4 TO THE 3 POWER IS 64 




Operator 



VARIATIONS IN USAGE 
None known. 

ALSO SEE 
f^and ** 
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The t (up-arrow) is used as an arithmetic exponentiation 
sign to compute the value of a base number to a specified 
power. 

For example, 2t3 is the same as the cube of 2 or 2 3 . 



TEST PROGRAM 

10 REM 't (EXPONENTIATION)' TEST PROGRAM 

20 PRINT "ENTER A BASE NUMBER"; 

30 INPUT O 

40 PRINT "NEXT ENTER A POWER NUMBER"; 

50 INPUT F 

60 P=Df F 

70 PRINT "THE NUMBERED; "TO THE";F;"POWER 1S";P 

30999 END 




Operator 



SAMPLE RUN (using 4 and 3) 

ENTER A BASE NUMBER? 4 

NEXT ENTER A POWER NUMBER? 3 

THE NUMBER 4 TO THE 3 POWER IS 64 

The t sign is also used to compute a number's root value by enclosing the inverse of the 
index number in parenthesis (1/n). 

For example, st(i/3) is the same as the cube root of 8, or JW. 



TEST PROGRAM 

10 REM ' t (USED AS A RADICAL- SIGN)' TEST PROGRAM 

20 PRINT "ENTER A BASE NUMBER"; 

30 INPUT B 

40 PRINT "NEXT ENTER A ROOT NUMBER"; 

50 INPUT N 

60 R-Bt(1/N) 

70 PRINT "THE";N;"ROOT OF";B ;"IS" ;R 

30999 END 

SAMPLE RUN (using 64 and 3) 

ENTER A BASE NUMBER? 64 
NEXT ENTER A ROOT NUMBER? 3 
THE 3 ROOT OF 64 IS 4 
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DIFFERENT OPERA TORS FOR f 

See **, a and ^ 

IF YOUR COMPUTER DOESN'T HA VE IT 

If they all fail, substitute the following subroutine: 

The subroutine programs found under LOG and EXP must be added to this one to make 
it work (saves space not to duplicate them here), 

30000 GOTO 30999 

30100 REM * EXPONENTIATION SUBROUTINE * INPUT X t Y; OUTPUT F 

30102 REM ALSO USES E,L,A,B,C INTERNALLY 

301 04 P-1 

30106 E = 

30108 IF Y = THEN 30120 

301 10 IF X <0 THEN 301 14 

301 12 GOTO 301 16 

30114 IF INT(Y} = Y THEN 30122 

30116 IFX<> 0THEN 30130 

301 18 P=P*E 

301 20 RETURN 

30122 F=M-2*Y-f4*INT(Y/2) 

30125 X=-X 

30130 GOSUB 30170 

30135 X = Y*L. 

30140 GOSUB 30240 

30145 P=P*E 

30150 RETURN 

To use this subroutine in the TEST PROGRAM, make these program changes: 

35 X=D 
55 Y=F 
60 GOSUB 30100 

VARIATIONS IN USAGE 
None known. 

ALSO SEE 

EXP, LOG, **, a , ~ 
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The < sign is used as a "less-than" relational operator to 
compare two numeric values in IF-THEN statements. For 
example, if a<b then i 00 tells the computer to branch 
to line 100 if the value of variable A is less than variable B. 



TEST PROGRAM 

10 REM < RELATIONAL OPERATOR 1 TEST PROGRAM 

20 A=10 

30 IF A< 20 THEN 60 

40 PRINT "THE< SIGN FAILED THE TEST" 

50 GOTO 99 

60 PRINT "THE< SIGN PASSED THE TEST" 

99 END 




Operator 



SAMPLE RUN 



THE< SIGN PASSED THE TEST 



VARIATIONS IN USAGE 



The < sign can be used by most computers to compare strings. The < sign compares the 
ASCII code of each character (from left-to-right) in two strings. The first difference in 
equality encountered determines the relationship. For example, string ABCDEF is less 
than string ABD even though the first string has more characters. Since the ASCII code 
for C (decimal 67) in the first string is less than, or precedes, the ASCII code for D (deci- 
mal 68) in the second string, it passes the < test. 

If each string has the same sequence of characters, then the longer string is considered 
larger. For example, string ABCD is larger than string ABC. 



TEST PROGRAM 

10 REM '< STRING OPERATOR 1 TEST PROGRAM 

20 AS=s"ABC" 

30 B$="ABCD" 

40 CS=s"B" 

50 IF AS< BS THEN 80 

60 PRINT "THE < SIGN FAIL-ED THE TEST IN LINE 50 

70 GOTO 999 

80 IF B$< CS THEN 110 

90 PRINT "THE< SIGN FAILED THE TEST IN LINE 80' 

100 GOTO 999 

110 PRINT "THE< SIGN PASSED THE TEST" 

999 END 
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SAMPLE RUN 

THE<SIGN PASSED THE TEST 

< is frequently combined with = to make the < = operator and combined with > to 
make "inequal" operators <>or ><. Some interpreters limit the number of characters 
which can be specifically compared in a string. 

ALSO SEE 
>,<>■><,=,$, IF-THEN 
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The > sign is used as a "greater-than" relational operator 
to compare two numeric values in IF-THEN statements. 
For example, if a > b then i 00 tells the computer to 
branch to line 100 if the value of variable A is greater than 
variable B. 

TEST PROGRAM 

10 REM ^RELATIONAL OPERATOR* TEST PROGRAM 

20 A = 20 

30 IF A>10 THEN 60 

40 PRINT ■*THE>SIGN FAILED THE TEST" 

50 GOTO 99 

60 PRINT "THE>SIGN PASSED THE TEST" 

99 END 




Operator 



SAMPLE RUN 

THE>SIGN PASSED THE TEST 

VARIATIONS IN USAGE 

The > sign can be used by most computers to compare strings. The > sign compares the 
ASCII code of each character (from left-to-right) between two strings. The first difference 
in equality encountered determines the relationship. For example, string ABD is greater 
than string ABCDEF even though the first string has fewer characters. Since the ASCII 
code for D (decimal 68) in the first string is greater than, or follows the ASCII code for 
C (67) in the second string, it passes the > test. 

If each string has the same sequence of characters, the longer string is considered larger. 
For example, string ABCD is larger than string ABC. 

TEST PROGRAM 

10 REM '>STR1NG OPERATOR' TEST PROGRAM 

20 AS = "ABCD" 

30 B$="ABC" 

40 CS="B" 

50 IF AS > BS THEN 80 

60 PRINT "THE >S1GN FAILED THE TEST IN LI N E SO" 

70 GOTO 999 

80 IF CS >B$ THEN 110 

90 PRINT "THE>SIGN FAILED THE TEST IN LINE 80" 

100 GOTO 999 

1 1 PRINT "THE >SIGN PASSED THE TEST" 

999 END 
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SAMPLE RUN 

THE>SIGN PASSED THE TEST 



>is commonly combined with = to make the >=operator and combined with< to make 
"inequal" operators <>or >< . Some interpreters limit the number of characters which 
can be specifically compared in a string. 



ALSO SEE 

<,<>,>< , =, GT, LT, NE, $, IF-THEN 
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The <> sign is used as a "not-equal" relational operator 
to compare two numeric values in IFTHEN statements 
for inequality. For example, if a<>b then 100 tells 
the computer to branch to line 100 if the value of variable 
A is not equal to variable B. 

TEST PROGRAM 

10 REM • < > RELATIONAL- OPERATOR* TEST PROGRAM 

20 A- 10 

30 IF A < > 20 THEN 60 

40 PRINT "THE < > SIGN FAILED THE TEST" 

50 GOTO 99 

60 PRINT "THE < >SIGN PASSED THE TEST" 

99 END 




Operator 



SAMPLE RUN 

THE<>SIGN PASSED THE TEST 

VARIATIONS IN USAGE 

TheO sign can be used by most computers to compare strings. The<> sign compares 
the ASCII code of each character (from left-to-right) in two strings. The first difference in 
equality encountered determines the relationship. In the example, if a$<>"abc" 
then 1 00 the interpreter compares the ASCII code of each character (from left-to-right) 
stored in string variable A$ against the characters enclosed in quotation marks. If a dif- 
ference in equality is encountered, or one string is longer than the other, the condition of 
the < > sign is met and the computer branches to line 100. 

TEST PROGRAM 

10 REM * < > STRING OPERATOR* TEST PROGRAM 

20 A$="ABCDE" 

30 IF AS < > "ABCD" THEN 60 

40 PRINT "THE < > SIGN FAILED THE TEST IN UNE 30" 

50 GOTO 999 

60iFA$ < > "ABCDE" THEN 80 

70 GOTO 1 00 

80 PRINT "THE < > SIGN FAILED THE TEST IN LINE 60 

90 GOTO 999 

100 PRINT "THE < > SIGN PASSED THE TEST" 

999 END 
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SAMPLE RUN 

THE <>SIGN PASSED THE TEST 

Some computers use the operator >< or #. Some interpreters limit the number of 
characters which can be specifically compared in a string. 

ALSO SEE 

#•>< ><>>, IF-THEN, $ 
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The >< sign is used by a few computers (e.g. those 
using MAX BASIC) as a "not-equal" relational operator. 

For more information see <> . 
TEST PROGRAM 

10 REM ' >< RELATIONAL OPERATOR' TEST PROGRAM 

20 A^10 

30 IF A >< 20 THEN 60 

40 PRINT "THE ><SIGN FAILED THE TEST" 

50 GOTO 99 

60 PRINT "THE><SIGN PASSED THE TEST" 

99 END 




Operator 



SAMPLE RUN 

THE ><StGN PASSED THE " 

VARIATIONS IN USAGE 

None known. 

ALSO SEE 

<>,#,NE, IF-THEN 
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The<= sign is used as a "less than or equal to" relational 
operator to compare two numeric values in IF-THEN 
statements. For example, if a<=b then i 00 tells the 
computer to branch to line 100 if the value of variable A 
is less than or equal to variable B. 

TEST PROGRAM 

10 REM '< = RELATIONAU OPERATOR* TEST PROGRAM 

20 A=M0 

30 IF A< = 20 THEN 60 

40 PRINT "THE<=SIGN FAIL.ED THE TEST IN LINE 30" 

50 GOTO 999 

60 IF A<=t0 THEN 90 

70 PRINT "THE<^SIGN FAILED THE TEST IN LINE 60" 

80 GOTO 999 

90 PRINT "THE<=SIGN PASSED THE TEST" 

999 END 




Operator 



SAMPLE RUN 



THE<= SIGN PASSED THE TEST 



VARIATIONS IN USAGE 

The < = sign can be used by most computers to compare strings. The < = sign com- 
pares the ASCII code of each character (from left-to-right) in two strings. The first dif- 
ference in equality encountered determines the relationship. 

If both strings have identical characters and are the same length, then they satisfy the< = 
relationship. For example, string ABCDEF is < string ABD even though the first string 
has more characters. Since the ASCII code for C (decimal 67) in the first string is less 
than, or precedes the ASCII code for D (68) in the second string, it passed the< = test. 

If each string has the same sequence of characters, then the longer string is considered 
larger. For example, string ABCD is larger than string ABC. 
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TEST PROGRAM 

10 REM '<-STRING OPERATOR' TEST PROGRAM 

20 AS="ABC" 

30 B$="ABCD" 

40 C$="B" 

50 IF A$<^BS THEN 80 

60 PRINT "THE<= SIGN FAILED THE TEST IN LINE 50" 

70 GOTO 999 

80 IF A$<= "ABC" THEN 110 

90 PRINT "THE<= SIGN FAILED THE TEST IN LINE 80" 

100 GOTO 999 

1 10 IF B$<= CS THEN 140 

120 PRINT "THE<= SIGN FAILED THE TEST IN LINE 1 10 

130 GOTO 999 

140 PRINT "THE<=SIGN PASSED THE TEST" 

999 END 



SAMPLE RUN 

THE<= SIGN PASSED THE TEST 

Some computers use the = < sign instead. Others allow it as an option. Some interpreters 
limit the number of characters which can be specifically compared in a string. 

ALSO SEE 

IF-THEN, < ,=, = <,>,>=,><,<> , $, LE, LT, EQ, GT, GE 
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>= is used as a "greater-than or equal-to" relational 
operator to compare two numeric (or string, when allow- 
ed) values in IF-THEN statements. 

For example, if a >=b then i 00 tells the computer to 
branch to line 100 if the value of variable A is greater- 
than or equal to variable B. 

TEST PROGRAM 

10 REM ' >- RELATIONAL. OPERATOR' TEST PROGRAM 

20 A^20 

30 IF A > = t THEN 60 

40 PRINT "THE >= SIGN FAILED THE TEST IN LINE 30" 

50 GOTO 999 

60 IF A >=20 THEN 90 

70 PRINT "THE >=^ SIGN FAILED THE TEST IN LINE 60" 

80 GOTO 999 

90 PRINT "THE >= SIGN PASSED THE TEST" 

999 END 




Operator 



SAMPLE RUN 

THE >= SIGN PASSED THE TEST 

The >= operator is allowed by some computers for string comparison. It compares the 
ASCII code of each character (from left-to-right) in two strings. The first difference in 
equality encountered determines the relationship. If both strings have identical characters 
and are the same length, then they satisfy the >= relationship. 

For example, string ABD is greater than string ABCDEF even though the first string has 
has fewer characters. Since the ASCII code for D (decimal 68) in the first string is greater 
than the ASCII code for C (decimal 67) in the second string, it passed the >= test. 

If each string has the same sequence of characters, then the longer string is considered 
larger. String ABCD is larger than string ABC. 
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TEST PROGRAM 

10 REM ' >=STRING OPERATOR* TEST PROGRAM 

20 A$="ABCD" 

30 B$="ABC" 

40 C$ = "B" 

50 IF AS > = B$THEN 80 

60 PRINT "THE >= SIGN FAILED THE TEST IN LINE 50" 

70 GOTO 999 

80 IF AS >=" ABC D" THEN 110 

90 PRINT "THE >= SIGN FAILED THE TEST IN LINE 80" 

100 GOTO 999 

1 10 IF CS >= B$ THEN 140 

120 PRINT "THE >== SIGN FAILED THE TEST IN LINE 110" 

130 GOTO 999 

140 PRINT "THE >^ SIGN PASSED THE TEST" 

999 END 

SAMPLE RUN 

THE >- SIGN PASSED THE TEST 

Some computers use the = > sign instead (or interchangeably). 

VARIATIONS IN USAGE 

None known. 

ALSO SEE 

IF-THEN, >,<><=,<>,>< 
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= < is used as an "equal to or less than" relational opera- 
tor to compare two numeric (or string, when allowed) 
values in IF-THEN statements. For example, if a=<b 
then 100 tells the computer to branch to line 100 if the 
value of variable A is equal to or less than variable B. 

For more information see < = 



TEST PROGRAM 

10 REM ■= < RELATIONAL OPERATOR' TEST PROGRAM 

20 A=I0 

30 IF A=< 20 THEN 60 

40 PRINT "THE=< SIGN FAILED THE TEST IN LINE 30" 

50 GOTO 999 

6 IF A=< 1 THEN 9 

70 PRINT "THE=< SIGN FAILED THE TEST IN LINE 60" 

80 GOTO 999 

90 PRINT "THE=< SIGN PASSED THE TEST" 

999 END 




Operator 



SAMPLE RUN 

THE -< SIGN PASSED THE TEST 

VARIATIONS IN USAGE 
None known. 

ALSO SEE 
IF-THEN, < = 
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= > is used as an "equal to or greater than" relational 
operator to compare two numeric (or string, when allow- 
ed) values in IF-THEN statements. For example, if 
a-> b then 100 tells the computer to branch to line 
100 if the value of variable A is equal to or greater than 
variable B. 

For more information see >= 
TEST PROGRAM 

10 REM = > RELATIONAL OPERATOR* TEST PROGRAM 

20 A = 20 

30 IF A=> 10 THEN 60 

40 PRINT "THE = > SIGN FAiLED THE TEST IN LINE 30" 

50 GOTO 999 

60 IF A= >20 THEN 90 

70 PRINT "THE => SIGN FAILED THE TEST IN LINE 60" 

80 GOTO 999 

90 PRINT "THE = > SIGN PASSED THE TEST" 

999 END 




Operator 



SAMPLE RUN 

THE = > SIGN PASSED THE TEST 

VARIATIONS IN USAGE 

None known. 

ALSO SEE 

IF-THEN, >= 
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The < sign is used in the IBM 5100 and 51 10 BASIC as 
an "equal to or less than" relational operator to compare 
two numeric values in IF-GOTO statements. 

For example, if a < b goto i 00 tells the computer to 
branch to line 100 if the value of variable A is equal to or 
less than variable B. 

For more information see <= 



TEST PROGRAM 

10 REM ' < RELATIONAL. OPERATOR' TEST PROGRAM 

20 A=10 

30 IF A < 20 GOTO 60 

40 PRINT "THE < SIGN FAILED THE TEST IN UINE 30" 

50 GOTO 999 

60 IF A < 10 GOTO 90 

70 PRINT "THE < SIGN FAILED THE TEST IN LINE 60" 

80 GOTO 999 

90 PRINT "THE < SIGN PASSED THE TEST" 

999 END 




Operator 



SAMPLE RUN 
< 



THE Zl SIGN PASSED THE TEST 



VARIATIONS IN USAGE 
None known. 

ALSO SEE 
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The > sign is used in the IBM 5100 and 5110 BASIC as 
an "greater than or equal to" relational operator to com- 
pare two numeric values in IF-GOTO statements. 

For example, if a > b goto i 00 tells the computer to 
branch to line 100 if the value of variable A is greater than 
or equal to variable B. 

For more information see >= 



TEST PROGRAM 

10 REM ' > RELATIONAL. OPERATOR' TEST PROGRAM 

20 A^20 

30 IF A > 10 GOTO 60 

40 PRINT "THE > SIGN FAILED THE TEST IN LINE 30" 

50 GOTO 999 

60 IF A ^20 GOTO 90 

70 PRINT "THE > SIGN FAILED THE TEST IN LINE 60" 

80 GOTO 999 

90 PRINT "THE > SIGN PASSED THE TEST" 

999 END 



SAMPLE RUN 

THE > SIGN PASSED THE TEST 

VARIATIONS IN USAGE 

None known. 

ALSO SEE 




Operator 
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The f sign is used in the IBM 5100 and 5110 BASIC as a 
"not-equal" relational operator to compare two numeric 
values in IF-GOTO statements. 

For example, if a f b goto i 00 tells the computer to 
branch to line 100 if the value of variable A is not equal 
to variable B, 

For more information see < > . 
TEST PROGRAM 

10 REM <f RELATIONAL OPERATOR' TEST PROGRAM 

20 A-10 

30 IP A^20 GOTO 60 

40 PRINT "THE =jt SIGN FAILED THE TEST" 

50 GOTO 99 

60 PRINT "THE ^ SIGN PASSED THE TEST" 

99 END 




Operator 



SAMPLE RUN 

THE f SIGN PASSED THE TEST 

VARIATIONS IN USAGE 
None known. 

ALSO SEE 
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The ' (apostrophe) is used by many computers as an 
abbreviation for the REMark statement. 

For more information see REM. 



TEST PROGRAM 

10 REM '(APOSTROPHE) TEST PROGRAM 

20 'PRINT "THE APOSTROPHE FAILED THE REM TEST' 




Statement 



30 "THE APOSTROPHE FAILED THE TEST IF LINE 20 IS PRINTED" 
40 PRINT "THE APOSTROPHE PASSED THE REM TEST" 
99 END 



SAMPLE RUN 



THE APOSTROPHE PASSED THE HEM TEST 



VARIATIONS IN USAGE 

A few computers use the apostrophe in PRINT statements to enclose strings instead of 
using quotation marks. 



TEST PROGRAM 

10 REM '(APOSTROPHE) * USED AS QUOTES * TEST PROGRAM 

20 PRINT 'THE APOSTROPHE PASSEDTHE QUOTATION MARK TEST' 

99 END 

SAMPLE RUN 

THE APOSTROPHE PASSED THE QUOTATION MARK TEST 

ALSO SEE 

REM, PRINT 
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Appendix A 
ASCII to DECIMAL Conversion Table 

In order to translate between binary computer numbers and English, a code 
number is set aside to stand for letters, decimal numbers and other characters. 
They are called "The ASCII Set". ASCII stands for the American Standard Code 
for Information Interchange. 

Refer to the ASCII table as you read the following: 

1. The characters represented by numbers between 32 and 90 are fairly uniform 
from computer to computer - but not 100%. 

2. The numbers from 97 to 122 are also reasonably uniform, but since they are 
lower case, and many terminals print only upper case characters, they serve 
simply as duplicates of other numbers. 

3. The numbers from to 3 1 used to be uniform in the old days of slow and 
clunking printing terminals. With the advent of video terminals and different 
peripheral devices, this uniformity has pretty well disappeared. 

4. From 123 to 255 is wide open. 

Use this simple BASIC program to discover what character your computer assigns 
to each decimal code number. The delay loop in lines 40 and 50 gives you a little 
time to view them on a video screen. You may wish to change the numbers to 
match the speed of your computer. 

10 FOR N = TO 255 

20 PRINT "ASCII NUMBER ";N, 

30 PRINT CHR$(N) 

40 FOR D=ITO 500 

50 NEXT D 

60 NEXT N 
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ASCII Number Code Chart (in decimal) 



Decimal 


ASCII 


Decimal 


ASCII 


Code 


Character 


Code 


Character 


32 


space 


79 





33 


1 


80 


P 


34 


i» 


81 


Q 


35 


# 


82 


R 


36 


S 


83 


S 


37 


% 


84 


T 


38 


& 


85 


U 


39 


1 


86 


V 


40 


( 


87 


w 


41 


) 


88 


X 


42 


^s 


89 


Y 


43 


+ 


90 


z 


44 


» 


91 


*or [ 


45 




92 


t 


46 




93 


~* 


47 


1 


94 


*» 


48 





95 


- 


49 


1 


97 


a 


50 


2 


98 


b 


51 


3 


99 


c 


52 


4 


100 


d 


53 


5 


101 


e 


54 


6 


102 


f 


55 


7 


103 


a 

o 


56 


8 


104 


h 


57 


9 


105 


i 


58 




106 


J 


59 


; 


107 


k 


60 


< 


108 


1 


61 


= 


109 


m 


62 


> 


110 


n 


63 


? 


111 





64 


@ 


112 


P 


65 


A 


113 


q 


66 


B 


114 


r 


67 


C 


115 


s 


68 


D 


116 


t 


69 


E 


117 


u 


70 


F 


118 


V 


71 


G 


119 


w 


72 


H 


120 


X 


73 


I 


121 


y 


74 


J 


122 


z 

{ 


75 


K 


123 


76 


L 


124 


\ 


77 


M 


125 


} 


78 


N 


126 


***r 



359 



For Additional Copies 

of 
The BASIC Handbook 

Contact your local Computer, Electronics or Book Store 

or 
Send $14.95 each + $1.35 Postage & Handling to 

COMPUSOFT PUBLISHING 

P. O. Box 19669-P 

San Diego, CA 92119 

(California addresses add 6% sales tax) 

Educational Discounts available for quantity purchases. 

Write for details. 

ISBN #0-932760-00-7 



360 



Variations of BASIC Included in this Handbook 



All, or nearly all of the features of the following 

BASIC dialects are explained: 

ANSI (American National Standards Institute) 

Minimum 
ADDS * BASIC 
ALTAIR 680 BASIC 
ALTAIR 8800 4K BASIC 
ALTAIR 8800 8K BASIC 
APPLE II BASIC 
BALLY BASIC 

COMMODORE PET 8K BASIC 
COMPAL^BO BASIC 
COMPAL MICROPOLIS BASIC 
COMPUCOLOR CORP BASIC 
CONTROL DATA BASIC VERSION 3 
CROMEMCO 3K CONTROL BASIC 
CROMEMCO 16K EXTENDED BASIC 
DATAPOINT BASIC 55 
DARTMOUTH BASIC (The original) 
DEC PDP-8E EDUSYSTEM-20 BASIC 
DECstation OS/78 BASIC 
DECsystem 10 BASIC 
DIGITAL GROUP MAXI-BASIC 
DIGITAL GROUP OPUS ONE 
EXIDY SORCERER BASIC 
GENERAL AUTOMATION BASIC 16 
HARRIS BASIC V 

HEATHKIT BENTON HARBOR BASIC 
HEATHKIT EXTENDED BASIC 
HEWLETT-PACKARD 2000 BASIC 
HEWLETT-PACKARD 3000 BASIC 
IBM 5100 BASIC 
IBM 5110 BASIC 
IMSA14K BASIC 
IMSAI 8K BASIC 
INTERDATA BASIC LEVEL II 
MECA BASIC 
MICROSOFT 680 BASIC 
MICROSOFT 4K BASIC 
MICROSOFT 8K BASIC 
MICROSOFT EXTENDED BASIC 
MOTOROLA BASIC 
NORTH STAR BASIC 
OHIO SCIENTIFIC 8K BASIC 
PALO ALTO TINY BASIC 
POLYMORPHIC SYSTEMS 1 1 K BASIC 
POLYMORPHIC SYSTEMS DISC BASIC 
PROCESSOR TECH BASIC-5 
PROCESSOR TECH EXTENDED CASSETTE 

BASIC 
QUANTELQICBASIC 
RADIO SHACK TRS^O LEVEL I BASIC 
RADIO SHACK TRS-80 LEVEL II BASIC 
SEL810B BASIC 
SWTP4K BASIC 
SWTP 8K BASIC 

SPERRY UNIVAC SYSTEM/9 BASIC 
VARIAN 620 BASIC 
WINTEK4K BASIC 



In addition, most or part of the following BASIC 
dielects are explained. Some of them have unique 
or special applications, while others are 
immensely powerful and high speed disc oriented. 
Only the most common disc words are included, 
but the underlying "main line" BASIC is 
covered in detail and is applicable to all of them. 

ALPHA MICRO BASIC 

BASIC TIMESHARING, INC. BASIC-X 

BILLINGS BASIC 

COMPUCOLOR CORP COMPUCOLOR II 

COMPUTERWARE CSS BASIC 

DEC BASIC-PLUS-2 

DIGITAL GROUP OPUS TWO 

DIGITAL GROUP BUSINESS-BASIC 

DYNABYTE BASIC CONTROLLER 

EDS BUSINESS BASIC 

HEWLETT PACKARD SYSTEM 45 BASIC 

HONEYWELL SERIES 60 BASIC 

INTERDATA BASIC 

MAXBASIC 

MICROWARE SYSTEMS A/BASIC COMPILER 

PRIME BASIC V/M 

POLYMORPHIC SYSTEMS EXTENDED BASIC 

PROCESSOR TECH EXTENDED DISC BASIC 

RCA COSMAC VIP BASIC 

TEKTRONIX 4051 BASIC 

TEXAS INSTRUMENTS 990 BUSINESS BASIC 

TEXAS INSTRUMENTS 990 SCIENTIFIC BASIC 

VECTOR GRAPHIC 8K BASIC 

WANG BASIC 

ZILOGZ-80 BASIC 



In nearly every version of BASIC listed 
here and throughout the HANDBOOK 
(and on the cover) one or more names 
or words are registered Trade Marks, 
and should be treated accordingly. 



$14.95 



Want to realty understand BASIC . . .? 

Can't make that favorite program run on your computer 

This book can help!!! 




About The Book 

This book is unique. It is not a text- 
book. Its far more than a dictionary. It 
is a virtual ENCYCLOPEDIA of the 
BASIC language. 

While not favoring one computer over 
-another, it explains over 250 BASIC 
words, how to use them, and alternate 
strategies. Since over 50 computers 
are represented, yours is probably in 
here too. 



About The Author 

Dr. David Lien is a longtime technical 
author and College Dean. His diverse 
technical background includes many 
years of Electronics/Computer teach- 
ing, plus Aerospace and Broadcast 
Engineering. His real specialty is 
making complicated things under- 
standable . . . without insulting your 
intelligence. 

He is probably best known in the 
computer field as the author of the 
Radio Shack TRS-80 Users/Learning 
Manual, a widely acclaimed classic 
and best seller. 
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